if (FALSE) {
## get twitter user data
jack <- lookup_users("jack")
## get data on most recent tweet from user(s)
tweets_data(jack)
## search for 100 tweets containing the letter r
r <- search_tweets("r")
## print tweets data (only first 10 rows are shown)
head(r, 10)
## preview users data
head(users_data(r))
}
Run the code above in your browser using DataLab