## Not run:
# # get ids of users followed by the president of the US
# pres <- get_friends(user = "potus")
# pres
#
# # get ids of users followed by the Environmental Protection Agency
# epa <- get_friends(user = "epa")
# epa
# ## End(Not run)
Run the code above in your browser using DataLab