## Not run:
# ## See examples for instaOAuth to know how token was created.
# ## Downloading list of followers of @senjohnmccain
# load("my_oauth")
# obama <- getUserMedia( username="barackobama", token=my_oauth )
# comments <- getComments( obama$id[1], token=my_oauth )
# ## End(Not run)
Run the code above in your browser using DataLab