Running 'spelling.R' [0s]
  Running 'testthat.R' [50s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > # This file is part of the standard setup for testthat.
  > # It is recommended that you do not modify it.
  > #
  > # Where should you do additional test configuration?
  > # Learn more about the roles of various files in:
  > # * https://r-pkgs.org/tests.html
  > # * https://testthat.r-lib.org/reference/test_package.html#special-files
  > 
  > library(testthat)
  > 
  > test_check("diseasystore")
  Loading required package: diseasystore
  #####
  
  Following drivers will be tested:
  
  #####
  Error in `purrr::map_chr()`:
  i In index: 2.
  Caused by error:
  ! invalid 'envir' argument of type 'character'
  Backtrace:
       x
    1. +-base::gc() at test-DiseasystoreBase.R:207:3
    2. +-`<fn>`(`<Logger>`)
    3. | \-.subset2(e, "finalize")()
    4. |   +-dbplyr::build_sql(...)
    5. |   | \-purrr::map_chr(enexprs(...), escape_expr, con = con)
    6. |   |   \-purrr:::map_("character", .x, .f, ..., .progress = .progress)
    7. |   |     +-purrr:::with_indexed_errors(...)
    8. |   |     | \-base::withCallingHandlers(...)
    9. |   |     +-purrr:::call_with_cleanup(...)
   10. |   |     \-dbplyr (local) .f(.x[[i]], ...)
   11. |   |       \-rlang::eval_bare(x, .env)
   12. |   +-dbplyr::as.sql(id(self$log_tbl, conn = private$log_conn), con = private$log_conn)
   13. |   +-SCDB::id(self$log_tbl, conn = private$log_conn)
   14. |   \-SCDB:::id.tbl_dbi(self$log_tbl, conn = private$log_conn)
   15. |     +-base::with(...)
   16. |     \-base::with.default(...)
   17. |       \-base::eval(substitute(expr), data, enclos = parent.frame())
   18. \-base::.handleSimpleError(...)
   19.   \-purrr (local) h(simpleError(msg, call))
   20.     \-cli::cli_abort(...)
   21.       \-rlang::abort(...)
  Error in `purrr::map_chr()`:
  i In index: 2.
  Caused by error:
  ! invalid 'envir' argument of type 'character'
  Backtrace:
       x
    1. +-base::gc() at test-DiseasystoreGoogleCovid19.R:110:3
    2. +-`<fn>`(`<Logger>`)
    3. | \-.subset2(e, "finalize")()
    4. |   +-dbplyr::build_sql(...)
    5. |   | \-purrr::map_chr(enexprs(...), escape_expr, con = con)
    6. |   |   \-purrr:::map_("character", .x, .f, ..., .progress = .progress)
    7. |   |     +-purrr:::with_indexed_errors(...)
    8. |   |     | \-base::withCallingHandlers(...)
    9. |   |     +-purrr:::call_with_cleanup(...)
   10. |   |     \-dbplyr (local) .f(.x[[i]], ...)
   11. |   |       \-rlang::eval_bare(x, .env)
   12. |   +-dbplyr::as.sql(id(self$log_tbl, conn = private$log_conn), con = private$log_conn)
   13. |   +-SCDB::id(self$log_tbl, conn = private$log_conn)
   14. |   \-SCDB:::id.tbl_dbi(self$log_tbl, conn = private$log_conn)
   15. |     +-base::with(...)
   16. |     \-base::with.default(...)
   17. |       \-base::eval(substitute(expr), data, enclos = parent.frame())
   18. \-base::.handleSimpleError(...)
   19.   \-purrr (local) h(simpleError(msg, call))
   20.     \-cli::cli_abort(...)
   21.       \-rlang::abort(...)
  Error in `purrr::map_chr()`:
  i In index: 2.
  Caused by error:
  ! invalid 'envir' argument of type 'character'
  Backtrace:
       x
    1. +-base::gc() at test-DiseasystoreGoogleCovid19.R:131:3
    2. +-`<fn>`(`<Logger>`)
    3. | \-.subset2(e, "finalize")()
    4. |   +-dbplyr::build_sql(...)
    5. |   | \-purrr::map_chr(enexprs(...), escape_expr, con = con)
    6. |   |   \-purrr:::map_("character", .x, .f, ..., .progress = .progress)
    7. |   |     +-purrr:::with_indexed_errors(...)
    8. |   |     | \-base::withCallingHandlers(...)
    9. |   |     +-purrr:::call_with_cleanup(...)
   10. |   |     \-dbplyr (local) .f(.x[[i]], ...)
   11. |   |       \-rlang::eval_bare(x, .env)
   12. |   +-dbplyr::as.sql(id(self$log_tbl, conn = private$log_conn), con = private$log_conn)
   13. |   +-SCDB::id(self$log_tbl, conn = private$log_conn)
   14. |   \-SCDB:::id.tbl_dbi(self$log_tbl, conn = private$log_conn)
   15. |     +-base::with(...)
   16. |     \-base::with.default(...)
   17. |       \-base::eval(substitute(expr), data, enclos = parent.frame())
   18. \-base::.handleSimpleError(...)
   19.   \-purrr (local) h(simpleError(msg, call))
   20.     \-cli::cli_abort(...)
   21.       \-rlang::abort(...)
  [ FAIL 4 | WARN 1 | SKIP 6 | PASS 310 ]
  
  ══ Skipped tests (6) ═══════════════════════════════════════════════════════════
  • empty test (6): 'test-DiseasystoreGoogleCovid19.R:135:1',
    'test-DiseasystoreGoogleCovid19.R:187:1',
    'test-DiseasystoreGoogleCovid19.R:248:1',
    'test-DiseasystoreGoogleCovid19.R:313:1', 'test-drop_diseasystore.R:3:1',
    'test-drop_diseasystore.R:49:1'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-DiseasystoreBase.R:129:3'): $get_feature verbosity works ───────
  <purrr_error_indexed/rlang_error/error/condition>
  Error in `pmap(.l, .f, ..., .progress = .progress)`: i In index: 1.
  Caused by error in `h()`:
  ! error in evaluating the argument 'name' in selecting a method for function 'dbRemoveTable': invalid 'envir' argument of type 'character'
  Backtrace:
       ▆
    1. ├─utils::capture.output(...) at test-DiseasystoreBase.R:129:3
    2. │ └─base::withVisible(...elt(i))
    3. ├─ds$get_feature("cyl", start_date = Sys.Date(), end_date = Sys.Date())
    4. │ └─purrr::pwalk(...)
    5. │   └─purrr::pmap(.l, .f, ..., .progress = .progress)
    6. │     └─purrr:::pmap_("list", .l, .f, ..., .progress = .progress)
    7. │       ├─purrr:::with_indexed_errors(...)
    8. │       │ └─base::withCallingHandlers(...)
    9. │       ├─purrr:::call_with_cleanup(...)
   10. │       └─diseasystore (local) .f(start_date = .l[[1L]][[i]], end_date = .l[[2L]][[i]], ...)
   11. │         └─SCDB::update_snapshot(...)
   12. │           └─logger$log_to_db(start_time = !!db_timestamp(tic, conn))
   13. │             ├─DBI::dbRemoveTable(...)
   14. │             ├─SCDB::id(patch, conn = private$log_conn, allow_table_only = FALSE)
   15. │             └─SCDB:::id.tbl_dbi(patch, conn = private$log_conn, allow_table_only = FALSE)
   16. │               ├─base::with(...)
   17. │               └─base::with.default(...)
   18. │                 └─base::eval(substitute(expr), data, enclos = parent.frame())
   19. ├─base::.handleSimpleError(...)
   20. │ └─base (local) h(simpleError(msg, call))
   21. └─base::.handleSimpleError(...)
   22.   └─purrr (local) h(simpleError(msg, call))
   23.     └─cli::cli_abort(...)
   24.       └─rlang::abort(...)
  ── Failure ('test-DiseasystoreGoogleCovid19.R:107:3'): DiseasystoreGoogleCovid19 works with URL source_conn ──
  Expected `ds$get_feature("n_hospital")` to run without any errors.
  i Actually got a <purrr_error_indexed> with text:
    i In index: 1.
    Caused by error in `h()`:
    ! error in evaluating the argument 'name' in selecting a method for function 'dbRemoveTable': invalid 'envir' argument of type 'character'
  ── Failure ('test-DiseasystoreGoogleCovid19.R:128:3'): DiseasystoreGoogleCovid19 works with directory source_conn ──
  Expected `ds$get_feature("n_hospital")` to run without any errors.
  i Actually got a <purrr_error_indexed> with text:
    i In index: 1.
    Caused by error in `h()`:
    ! error in evaluating the argument 'name' in selecting a method for function 'dbRemoveTable': invalid 'envir' argument of type 'character'
  ── Error ('test-SCDB_messages.R:36:3'): SCDB gives too many messages ───────────
  Error in `db_query_fields.DBIConnection(con, ...)`: Can't query fields.
  i Using SQL: SELECT * FROM `test_ds.mtcars` AS `q01` WHERE (0 = 1)
  Caused by error:
  ! no such table: test_ds.mtcars
  Backtrace:
       ▆
    1. ├─base::tryCatch(...) at test-SCDB_messages.R:36:3
    2. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
    3. │   └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
    4. │     └─base (local) doTryCatch(return(expr), name, parentenv, handler)
    5. ├─SCDB::is.historical(dplyr::tbl(conn, test_id))
    6. │ └─SCDB:::assert_data_like(.data)
    7. │   ├─checkmate::assert(...)
    8. │   │ └─base::eval(dots[[i]], envir = env)
    9. │   │   └─base::eval(dots[[i]], envir = env)
   10. │   └─checkmate::check_class(.data, "tbl_dbi", ...)
   11. ├─dplyr::tbl(conn, test_id)
   12. ├─dplyr:::tbl.DBIConnection(conn, test_id)
   13. │ ├─dplyr::tbl(...)
   14. │ └─dbplyr:::tbl.src_dbi(...)
   15. │   └─dbplyr::tbl_sql(c(subclass, "dbi"), src = src, from = from, ...)
   16. │     ├─base::withCallingHandlers(...)
   17. │     ├─vars %||% dbplyr_query_fields(src$con, source)
   18. │     └─dbplyr:::dbplyr_query_fields(src$con, source)
   19. │       └─dbplyr:::dbplyr_fallback(con, "db_query_fields", ...)
   20. │         ├─rlang::eval_bare(expr((!!fun)(con, ...)))
   21. │         └─dbplyr:::db_query_fields.DBIConnection(con, ...)
   22. │           └─dbplyr:::db_get_query(con, sql, "Can't query fields.")
   23. │             ├─dbplyr:::dbi_wrap(...)
   24. │             │ └─base::withCallingHandlers(...)
   25. │             ├─DBI::dbGetQuery(con, sql)
   26. │             └─DBI::dbGetQuery(con, sql)
   27. │               └─DBI (local) .local(conn, statement, ...)
   28. │                 ├─DBI::dbSendQuery(conn, statement, ...)
   29. │                 └─RSQLite::dbSendQuery(conn, statement, ...)
   30. │                   └─RSQLite (local) .local(conn, statement, ...)
   31. │                     ├─methods::new(...)
   32. │                     │ ├─methods::initialize(value, ...)
   33. │                     │ └─methods::initialize(value, ...)
   34. │                     └─RSQLite:::result_create(conn@ptr, statement)
   35. └─base::.handleSimpleError(...)
   36.   └─dbplyr (local) h(simpleError(msg, call))
   37.     └─cli::cli_abort(msg, parent = cnd, call = call, .envir = env)
   38.       └─rlang::abort(...)
  
  [ FAIL 4 | WARN 1 | SKIP 6 | PASS 310 ]
  Error: Test failures
  Execution halted