Fodder for a gd_ls() function.

devtools::load_all("..")
gs_auth(file.path("..", "tests", "testthat", "googlesheets_token.rds"))
drfiles <- httr::GET(.state$gd_base_url_files_v3, get_google_token())
httr::status_code(drfiles)
drfiles <- content_as_json_UTF8(drfiles)
str(drfiles)
head(drfiles$files)


dakota1063/dddd documentation built on May 25, 2019, 4:21 p.m.