# NOT RUN {
## See examples for fbOAuth to know how token was created.
## Searching 100 public pages that mention cats
load("fb_oauth")
pages <- facebook.search(query="cats", type="page", token=fb_oauth, n=100)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab