# NOT RUN {
## See examples for fbOAuth to know how token was created.
load("fb_page_oauth")
## Getting the messages of the first conversation of an example page.
## A page access token is needed to access the inbox
messages <- FacebookPagesCollection("9thcirclegames", fb_page_oauth) %>%
FacebookConversationsCollection(n = 1) %>%
FacebookMessagesCollection()
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab