## Not run: ------------------------------------
# ## See examples for fbOAuth to know how token was created.
# ## Getting information about Facebook's Facebook Page
# load("fb_oauth")
# fb_page <- getPage(page="facebook", token=fb_oauth)
# ## Getting shares of most recent post
# shares <- getShares(post=fb_page$id[1], n=2000, token=fb_oauth)
## ---------------------------------------------
Run the code above in your browser using DataLab