suppress some warnings
1 files changed, 1 insertions(+), 1 deletions(-) M R/mercury.r
M R/mercury.r => R/mercury.r +1 -1
@@ 23,7 23,7 @@ just_the_facts <- function(url, mercury_api_key=Sys.getenv("MERCURY_API_KEY")) { res <- httr::content(res, as="text", encoding="UTF-8") res <- jsonlite::fromJSON(res, flatten=TRUE) res <- purrr::flatten_df(res) res <- readr::type_convert(res, col_types=.hgr_cols) res <- suppressWarnings(readr::type_convert(res, col_types=.hgr_cols)) class(res) <- c("hgr")