Running ‘testthat.R’ [348s/568s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(covid19mobility)
  > library(glue)
  > library(dplyr)
  
  Attaching package: 'dplyr'
  
  The following object is masked from 'package:glue':
  
      collapse
  
  The following object is masked from 'package:testthat':
  
      matches
  
  The following objects are masked from 'package:stats':
  
      filter, lag
  
  The following objects are masked from 'package:base':
  
      intersect, setdiff, setequal, union
  
  > 
  > refresh_funs <- dplyr::tribble(
  +   ~fun, ~len, ~date_check,
  +   "refresh_covid19mobility_apple_country", 18207, "2020-05-11",
  +   "refresh_covid19mobility_apple_subregion", 91590, "2020-06-04",
  +   "refresh_covid19mobility_apple_city", 453690, "2020-06-04", # as of 2020
  +   "refresh_covid19mobility_google_country", 83160, "2020-06-04", # as of 2020
  +   "refresh_covid19mobility_google_subregions", 1081764, "2020-06-04", # as of 2020
  +   "refresh_covid19mobility_google_us_counties", 1708692, "2020-06-04" # as of 2020
  + )
  > 
  > refresh_funs <- refresh_funs %>%
  +   dplyr::mutate(dat = lapply(fun, function(x) eval(call(x))))
  Warning: Problem with `mutate()` input `dat`.
  ℹ 19690 parsing failures.
   row        col           expected                  actual                                                                  file
  2694 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2695 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2696 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2697 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2698 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  .... .......... .................. ....................... .....................................................................
  See problems(...) for more detai [... truncated]
  Warning: 19690 parsing failures.
   row        col           expected                  actual                                                                  file
  2694 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2695 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2696 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2697 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2698 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  .... .......... .................. ....................... .....................................................................
  See problems(...) for more details.
  
  Warning: Problem with `mutate()` input `dat`.
  ℹ 19690 parsing failures.
   row        col           expected                  actual                                                                  file
  2694 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2695 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2696 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2697 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2698 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  .... .......... .................. ....................... .....................................................................
  See problems(...) for more detai [... truncated]
  Warning: 19690 parsing failures.
   row        col           expected                  actual                                                                  file
  2694 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2695 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2696 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2697 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2698 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  .... .......... .................. ....................... .....................................................................
  See problems(...) for more details.
  
  Joining, by = c("location_code", "sub_region_1")
  Warning: Problem with `mutate()` input `dat`.
  ℹ 19690 parsing failures.
   row        col           expected                  actual                                                                  file
  2694 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2695 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2696 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2697 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2698 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  .... .......... .................. ....................... .....................................................................
  See problems(...) for more detai [... truncated]
  Warning: 19690 parsing failures.
   row        col           expected                  actual                                                                  file
  2694 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2695 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2696 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2697 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2698 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  .... .......... .................. ....................... .....................................................................
  See problems(...) for more details.
  
  Error: Problem with `mutate()` input `dat`.
  ✖ Cannot read file /tmp/RtmpPlaqdl/working_dir/RtmpFPaGXw/file2d8c5cfb214c: Not enough space
  ℹ Input `dat` is `lapply(fun, function(x) eval(call(x)))`.
  Backtrace:
       █
    1. ├─refresh_funs %>% dplyr::mutate(dat = lapply(fun, function(x) eval(call(x))))
    2. ├─dplyr::mutate(., dat = lapply(fun, function(x) eval(call(x))))
    3. ├─dplyr:::mutate.data.frame(., dat = lapply(fun, function(x) eval(call(x))))
    4. │ └─dplyr:::mutate_cols(.data, ...)
    5. │   ├─base::withCallingHandlers(...)
    6. │   └─mask$eval_all_mutate(dots[[i]])
    7. ├─base::lapply(fun, function(x) eval(call(x)))
    8. │ └─FUN(X[[i]], ...)
    9. │   ├─base::eval(call(x))
   10. │   │ └─base::eval(call(x))
   11. │   └─covid19mobility::refresh_covid19mobility_google_us_counties()
   12. │     ├─`%>%`(...)
   13. │     └─covid19mobility:::read_google_mobility()
   14. │       └─readr::read_csv(...)
   15. │         └─readr:::read_delimited(...)
   16. │           └─readr:::col_spec_standardise(...)
   17. │             └─readr:::guess_header(ds_header, tokenizer, locale)
   18. │               └─readr:::guess_header_(datasource, tokenizer, locale)
   19. ├─dplyr::filter(., !is.na(sub_region_2))
   20. ├─dplyr::mutate(...)
   21. ├─dplyr::select(., -location_code)
   22. ├─dplyr::filter(., country_region == "Puerto Rico")
   23. └─base::.handleSimpleError(...)
   24.   └─dplyr:::h(simpleError(msg, call))
  Execution halted