Running ‘testthat.R’ [2s/4s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(ssrn)
  > 
  > test_check("ssrn")
  [ FAIL 2 | WARN 1 | SKIP 0 | PASS 10 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-matrix.R:30:3'): passenger works ───────────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─jreast_jt_od %>% ... at test-matrix.R:30:2
    2. ├─ssrn::make_passenger_matrix(...)
    3. │ └─... %>% ...
    4. ├─dplyr::summarise(...)
    5. ├─dplyr::group_by(...)
    6. ├─dplyr::filter(...)
    7. ├─ssrn:::make_pass_volume(...)
    8. │ └─data %>% dplyr::right_join(st_data, by = ...)
    9. ├─dplyr::right_join(., st_data, by = ...)
   10. └─dplyr:::right_join.data.frame(., st_data, by = ...)
   11.   └─dplyr:::join_mutate(...)
   12.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   13.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   14.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   15.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   16.           ├─base::withCallingHandlers(...)
   17.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-od.R:17:3'): multiplication works ──────────────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─ssrn::make_passenger_od(...) at test-od.R:17:2
    2. │ └─d %>% dplyr::full_join(stations, by = by_1) %>% ...
    3. ├─dplyr::full_join(...)
    4. └─dplyr:::full_join.data.frame(...)
    5.   └─dplyr:::join_mutate(...)
    6.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
    7.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
    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]])
  
  [ FAIL 2 | WARN 1 | SKIP 0 | PASS 10 ]
  Error: Test failures
  Execution halted