## Not run:
# ## See examples for instaOAuth to know how token was created.
# ## Capturing information about 50 most recent pictures by @barackobama
# load("my_oauth")
# obama <- getUserMedia( username="barackobama", token=my_oauth, n=50, folder="barackobama")
# ## End(Not run)
Run the code above in your browser using DataLab