if (FALSE) {
## get coordinates associated with the following addresses/components
sf <- lookup_coords("san francisco, CA", "country:US")
usa <- lookup_coords("usa")
lnd <- lookup_coords("london")
bz <- lookup_coords("brazil")
## pass a returned coords object to search_tweets
bztw <- search_tweets(geocode = bz)
## or stream tweets
ustw <- stream_tweets(usa, timeout = 10)
}
Run the code above in your browser using DataLab