Running ‘dplyr_attrib.R’ [1s/2s]
  Running ‘testthat.R’ [27s/38s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(blocs)
  > 
  > test_check("blocs")
  
  Attaching package: 'dplyr'
  
  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
  
  ########### TESTING WITH ANES 1984 1996 ###########
  ########### TESTING WITH ANES 1984 1992 ###########
  ########### TESTING WITH ANES 2012 2020 ###########
  ########### TESTING WITH ANES 1992 ###########
  20202008 2012 201619522016 2020########### TESTING WITH ANES 2008 ###################### TESTING WITH ANES 2004 ###################### TESTING WITH ANES 1980 2000 ###########
  [ FAIL 4 | WARN 30 | SKIP 4 | PASS 38 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • empty test (4)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-continuous.R:85:5'): vb_continuous runs on ANES ────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─blocs::vb_continuous(...) at test-continuous.R:85:4
    2. │ ├─... %>% ...
    3. │ ├─dplyr::full_join(...)
    4. │ └─dplyr:::full_join.data.frame(...)
    5. │   └─dplyr:::join_mutate(...)
    6. │     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
    7. │     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
    8. │       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
    9. │         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   10. │           ├─base::withCallingHandlers(...)
   11. │           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
   12. └─dplyr::full_join(., results_list$vote, by = c("resample", indep))
  ── Error ('test-difference.R:53:5'): difference works with bootstrapping ───────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% lapply(filter, !is.na(race)) at test-difference.R:53:4
    2. ├─base::lapply(., filter, !is.na(race))
    3. ├─base::lapply(...)
    4. │ └─blocs (local) FUN(X[[i]], ...)
    5. │   └─... %>% ...
    6. ├─dplyr::full_join(., results_list$vote, by = c("resample", indep))
    7. ├─dplyr::full_join(...)
    8. └─dplyr:::full_join.data.frame(...)
    9.   └─dplyr:::join_mutate(...)
   10.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   11.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
   12.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   13.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   14.           ├─base::withCallingHandlers(...)
   15.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-discrete.R:156:5'): Bootstrapping runs ─────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─blocs::vb_discrete(...) at test-discrete.R:156:4
    2. │ └─... %>% ...
    3. ├─dplyr::full_join(., results_list$vote, by = c("resample", indep))
    4. ├─dplyr::full_join(...)
    5. └─dplyr:::full_join.data.frame(...)
    6.   └─dplyr:::join_mutate(...)
    7.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    8.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,2]>`)
    9.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   10.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   11.           ├─base::withCallingHandlers(...)
   12.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-uncertainty.R:51:5'): Uncertainty runs for discrete blocs ──────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_warning(...) at test-uncertainty.R:51:4
    2. │ └─testthat:::expect_condition_matching(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─blocs::vb_discrete(...)
    8. │ └─... %>% ...
    9. ├─dplyr::full_join(., results_list$vote, by = c("resample", indep))
   10. ├─dplyr::full_join(...)
   11. └─dplyr:::full_join.data.frame(...)
   12.   └─dplyr:::join_mutate(...)
   13.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   14.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,3]>`)
   15.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   16.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   17.           ├─base::withCallingHandlers(...)
   18.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  
  [ FAIL 4 | WARN 30 | SKIP 4 | PASS 38 ]
  Error: Test failures
  Execution halted