knitr::opts_chunk$set( collapse = TRUE, eval=F, comment = "#>" )
library(gitterhub)
Setup service
gs <- gitterService()
list groups
myGroups <- gs$list_groups() myGroups_df <- gs$list_groupsAsDataframe()
list rooms
myRooms <- gs$list_roomsUnderAGroupAsDataFrame(groupId="593fd022d73408ce4f66f764")
list users
roomUsers <- gs$list_usersInARoomAsDataFrame("5f60610fd73408ce4feee869")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.