if (FALSE) {
## format datetime for one week ago
toDate <- format(Sys.time() - 60 * 60 * 24 * 7, "%Y%m%d%H%M")
## search 30day for up to 300 rstats tweets sent before the last week
rt <- search_30day("#rstats", n = 300,
env_name = "research", toDate = toDate)
}
Run the code above in your browser using DataLab