Running ‘testthat.R’ [5s/9s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(modeltests)
  > 
  > test_check("modeltests")
  [ FAIL 7 | WARN 0 | SKIP 0 | PASS 257 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-augment_data_helper.R:65:3'): add_missing = TRUE ───────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─modeltests:::augment_data_helper(tbl, add_missing = TRUE) at test-augment_data_helper.R:65:2
   2.   ├─base::`[<-`(`*tmp*`, i, i, value = `<lgl>`)
   3.   └─tibble:::`[<-.tbl_df`(`*tmp*`, i, i, value = `<lgl>`)
   4.     └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   5.       └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   6.         ├─base::withCallingHandlers(...)
   7.         └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Failure ('test-check_augment_data_specification.R:34:3'): add_missing = FALSE, test_newdata = FALSE ──
  `check_augment_data_specification(...)` threw an error with unexpected message.
  Expected match: "Augmented data must be the same for tibble and data frame input."
  Actual message: "DLL requires the use of native symbols"
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-check_augment_data_specification.R:34:2
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. └─modeltests:::check_augment_data_specification(...)
    7.   └─modeltests (local) aug(model, data = dl$tibble, newdata = new_dl$tibble)
    8.     ├─base::`[<-`(`*tmp*`, 1, 1, value = `<dbl>`) at test-check_augment_data_specification.R:21:2
    9.     └─tibble:::`[<-.tbl_df`(`*tmp*`, 1, 1, value = `<dbl>`) at test-check_augment_data_specification.R:21:2
   10.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.           ├─base::withCallingHandlers(...)
   13.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Failure ('test-check_augment_data_specification.R:45:3'): add_missing = FALSE, test_newdata = FALSE ──
  `check_augment_data_specification(...)` threw an error with unexpected message.
  Expected match: "Augmented data must be the same for dataframes with and without rownames."
  Actual message: "DLL requires the use of native symbols"
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-check_augment_data_specification.R:45:2
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. └─modeltests:::check_augment_data_specification(...)
    7.   └─modeltests (local) aug(model, data = dl$tibble, newdata = new_dl$tibble)
    8.     ├─base::`[<-`(`*tmp*`, 1, 1, value = `<dbl>`) at test-check_augment_data_specification.R:28:2
    9.     └─tibble:::`[<-.tbl_df`(`*tmp*`, 1, 1, value = `<dbl>`) at test-check_augment_data_specification.R:28:2
   10.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.           ├─base::withCallingHandlers(...)
   13.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Failure ('test-check_augment_data_specification.R:69:3'): add_missing = FALSE, test_newdata = TRUE ──
  `check_augment_data_specification(...)` threw an error with unexpected message.
  Expected match: "Augmented data must be the same for tibble and data frame input."
  Actual message: "DLL requires the use of native symbols"
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-check_augment_data_specification.R:69:2
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. └─modeltests:::check_augment_data_specification(...)
    7.   └─modeltests (local) aug(model, data = dl$tibble, newdata = new_dl$tibble)
    8.     ├─base::`[<-`(`*tmp*`, 1, 1, value = `<dbl>`) at test-check_augment_data_specification.R:21:2
    9.     └─tibble:::`[<-.tbl_df`(`*tmp*`, 1, 1, value = `<dbl>`) at test-check_augment_data_specification.R:21:2
   10.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.           ├─base::withCallingHandlers(...)
   13.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Failure ('test-check_augment_data_specification.R:80:3'): add_missing = FALSE, test_newdata = TRUE ──
  `check_augment_data_specification(...)` threw an error with unexpected message.
  Expected match: "Augmented data must be the same for dataframes with and without rownames."
  Actual message: "DLL requires the use of native symbols"
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-check_augment_data_specification.R:80:2
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. └─modeltests:::check_augment_data_specification(...)
    7.   └─modeltests (local) aug(model, data = dl$tibble, newdata = new_dl$tibble)
    8.     ├─base::`[<-`(`*tmp*`, 1, 1, value = `<dbl>`) at test-check_augment_data_specification.R:28:2
    9.     └─tibble:::`[<-.tbl_df`(`*tmp*`, 1, 1, value = `<dbl>`) at test-check_augment_data_specification.R:28:2
   10.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.           ├─base::withCallingHandlers(...)
   13.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Failure ('test-check_augment_data_specification.R:104:3'): add_missing = TRUE, test_newdata = TRUE ──
  `check_augment_data_specification(...)` threw an error with unexpected message.
  Expected match: "Augmented data must be the same for tibble and data frame input."
  Actual message: "DLL requires the use of native symbols"
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-check_augment_data_specification.R:104:2
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. └─modeltests:::check_augment_data_specification(...)
    7.   └─modeltests (local) aug(model, data = dl$tibble, newdata = new_dl$tibble)
    8.     ├─base::`[<-`(`*tmp*`, 1, 1, value = `<dbl>`) at test-check_augment_data_specification.R:21:2
    9.     └─tibble:::`[<-.tbl_df`(`*tmp*`, 1, 1, value = `<dbl>`) at test-check_augment_data_specification.R:21:2
   10.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.           ├─base::withCallingHandlers(...)
   13.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Failure ('test-check_augment_data_specification.R:115:3'): add_missing = TRUE, test_newdata = TRUE ──
  `check_augment_data_specification(...)` threw an error with unexpected message.
  Expected match: "Augmented data must be the same for dataframes with and without rownames."
  Actual message: "DLL requires the use of native symbols"
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-check_augment_data_specification.R:115:2
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. └─modeltests:::check_augment_data_specification(...)
    7.   └─modeltests (local) aug(model, data = dl$tibble, newdata = new_dl$tibble)
    8.     ├─base::`[<-`(`*tmp*`, 1, 1, value = `<dbl>`) at test-check_augment_data_specification.R:28:2
    9.     └─tibble:::`[<-.tbl_df`(`*tmp*`, 1, 1, value = `<dbl>`) at test-check_augment_data_specification.R:28:2
   10.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.           ├─base::withCallingHandlers(...)
   13.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  
  [ FAIL 7 | WARN 0 | SKIP 0 | PASS 257 ]
  Error: Test failures
  Execution halted