Running ‘testthat.R’ [298s/488s]
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`.
  ℹ 15010 parsing failures.
   row        col           expected                  actual                                                                  file
  2046 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2047 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2048 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2049 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2050 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: 15010 parsing failures.
   row        col           expected                  actual                                                                  file
  2046 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2047 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2048 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2049 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2050 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`.
  ℹ 15010 parsing failures.
   row        col           expected                  actual                                                                  file
  2046 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2047 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2048 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2049 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2050 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: 15010 parsing failures.
   row        col           expected                  actual                                                                  file
  2046 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2047 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2048 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2049 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2050 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`.
  ℹ 15010 parsing failures.
   row        col           expected                  actual                                                                  file
  2046 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2047 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2048 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2049 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2050 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: 15010 parsing failures.
   row        col           expected                  actual                                                                  file
  2046 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2047 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2048 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2049 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2050 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`.
  ℹ 15010 parsing failures.
   row        col           expected                  actual                                                                  file
  2046 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2047 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2048 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2049 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2050 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: 15010 parsing failures.
   row        col           expected                  actual                                                                  file
  2046 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2047 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2048 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2049 metro_area 1/0/T/F/TRUE/FALSE Kabul Metropolitan Area 'https://www.gstatic.com/covid19/mobility/Global_Mobility_Report.csv'
  2050 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`.
  ✖ unable to load shared object '/home/ripley/R/Lib32/rgdal/libs/rgdal.so':
    ld.so.1: R: fatal: libgdal.so.20: open failed: No such file or directory
  ℹ 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. │ ├─base::withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
    3. │ └─base::eval(quote(`_fseq`(`_lhs`)), env, env)
    4. │   └─base::eval(quote(`_fseq`(`_lhs`)), env, env)
    5. │     └─`_fseq`(`_lhs`)
    6. │       └─magrittr::freduce(value, `_function_list`)
    7. │         ├─base::withVisible(function_list[[k]](value))
    8. │         └─function_list[[k]](value)
    9. │           ├─dplyr::mutate(., dat = lapply(fun, function(x) eval(call(x))))
   10. │           └─dplyr:::mutate.data.frame(., dat = lapply(fun, function(x) eval(call(x))))
   11. │             └─dplyr:::
  Execution halted