if (FALSE) { # interactive()
# check to make sure there are requests still available
if (rate_limit_check(quiet = TRUE) > 30) {
tt_gh <- tt_load_gh("2019-01-15")
## readme attempts to open the readme for the weekly dataset
readme(tt_gh)
agencies <- tt_download(
tt_gh,
files = "agencies.csv"
)
}
}
Run the code above in your browser using DataLab