Running ‘testthat.R’ [50s/78s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > 
  > 
  > test_check("convergEU")
  Loading required package: convergEU
  [ FAIL 17 | WARN 0 | SKIP 0 | PASS 593 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test_average_clust.R:11:3'): Check the average value ────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─base::`[<-`(`*tmp*`, aux, -1, value = `<int>`) at test_average_clust.R:11:2
   2. └─tibble:::`[<-.tbl_df`(`*tmp*`, aux, -1, value = `<int>`) at test_average_clust.R:11:2
   3.   └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   4.     └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   5.       ├─base::withCallingHandlers(...)
   6.       └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test_average_clust.R:24:3'): Test if checking works ─────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─base::`[<-`(`*tmp*`, aux, -1, value = `<int>`) at test_average_clust.R:24:2
   2. └─tibble:::`[<-.tbl_df`(`*tmp*`, aux, -1, value = `<int>`) at test_average_clust.R:24:2
   3.   └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   4.     └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   5.       ├─base::withCallingHandlers(...)
   6.       └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test_country_ranking.R:50:3'): Ranking lowBest ──────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─convergEU::country_ranking(...) at test_country_ranking.R:50:2
   2.   ├─base::`[<-`(`*tmp*`, auxMS, , value = `<named list>`)
   3.   └─tibble:::`[<-.tbl_df`(`*tmp*`, auxMS, , value = `<named list>`)
   4.     └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   5.       └─tibble:::tbl_subassign_row(xo, i, value, i_arg, value_arg, call)
   6.         ├─base::withCallingHandlers(...)
   7.         └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test_departure_best.R:17:3'): Indicator highBest ────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─convergEU::departure_best(testTB, timeName = "time", indiType = "highBest") at test_departure_best.R:17:2
   2.   ├─base::`[<-`(`*tmp*`, aux, -posizTime, value = `<df[,3]>`)
   3.   └─tibble:::`[<-.tbl_df`(`*tmp*`, aux, -posizTime, value = `<df[,3]>`)
   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]])
  ── Error ('test_departure_best.R:52:3'): Indicator lowBest ─────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─convergEU::departure_best(testTB, timeName = "time", indiType = "lowBest") at test_departure_best.R:52:2
   2.   ├─base::`[<-`(`*tmp*`, aux, -posizTime, value = `<df[,3]>`)
   3.   └─tibble:::`[<-.tbl_df`(`*tmp*`, aux, -posizTime, value = `<df[,3]>`)
   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]])
  ── Error ('test_departure_mean.R:19:3'): Simplest test on results ──────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─convergEU::departure_mean(...) at test_departure_mean.R:19:2
   2.   ├─base::`[<-`(`*tmp*`, infEstra, aux, value = `<dbl>`)
   3.   └─tibble:::`[<-.tbl_df`(`*tmp*`, infEstra, aux, value = `<dbl>`)
   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]])
  ── Error ('test_departure_mean.R:48:3'): Change time name ──────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─convergEU::departure_mean(...) at test_departure_mean.R:48:2
   2.   ├─base::`[<-`(`*tmp*`, infEstra, aux, value = `<dbl>`)
   3.   └─tibble:::`[<-.tbl_df`(`*tmp*`, infEstra, aux, value = `<dbl>`)
   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]])
  ── Error ('test_departure_mean.R:65:3'): Test of eurofound dataset, scrambled, further statistics. ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─convergEU::departure_mean(oriTB = testTB, sigmaTB = mySC$res) at test_departure_mean.R:65:2
   2.   ├─base::`[<-`(`*tmp*`, infEstra, aux, value = `<dbl>`)
   3.   └─tibble:::`[<-.tbl_df`(`*tmp*`, infEstra, aux, value = `<dbl>`)
   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]])
  ── Error ('test_gamma_conv_msteps.R:48:3'): Basic exceptions ───────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─base::`[<-`(`*tmp*`, 3, 3, value = `<lgl>`) at test_gamma_conv_msteps.R:48:2
   2. └─tibble:::`[<-.tbl_df`(`*tmp*`, 3, 3, value = `<lgl>`) at test_gamma_conv_msteps.R:48:2
   3.   └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   4.     └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   5.       ├─base::withCallingHandlers(...)
   6.       └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test_graph_departure.R:57:7'): LowBest and highBest ─────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─convergEU::departure_mean(oriTB = testTB, sigmaTB = mySTB$res) at test_graph_departure.R:57:6
   2.   ├─base::`[<-`(`*tmp*`, infEstra, aux, value = `<dbl>`)
   3.   └─tibble:::`[<-.tbl_df`(`*tmp*`, infEstra, aux, value = `<dbl>`)
   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]])
  ── Error ('test_ma_dataset.R:64:3'): Smoothing: exceptions ─────────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─base::`[<-`(`*tmp*`, 5, 3, value = `<lgl>`) at test_ma_dataset.R:64:2
   2. └─tibble:::`[<-.tbl_df`(`*tmp*`, 5, 3, value = `<lgl>`) at test_ma_dataset.R:64:2
   3.   └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   4.     └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   5.       ├─base::withCallingHandlers(...)
   6.       └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test_scoreb_yrs.R:14:3'): Basic calculations on levels ──────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─convergEU::scoreb_yrs(emp_20_64_MS, timeName = "time") at test_scoreb_yrs.R:14:2
   2.   ├─base::`[<-`(`*tmp*`, -1, auxN, value = `<int>`)
   3.   └─tibble:::`[<-.tbl_df`(`*tmp*`, -1, auxN, value = `<int>`)
   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]])
  ── Error ('test_scoreb_yrs.R:42:3'): Basic calculations on change ──────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─convergEU::scoreb_yrs(emp_20_64_MS, timeName = "time") at test_scoreb_yrs.R:42:2
   2.   ├─base::`[<-`(`*tmp*`, -1, auxN, value = `<int>`)
   3.   └─tibble:::`[<-.tbl_df`(`*tmp*`, -1, auxN, value = `<int>`)
   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]])
  ── Error ('test_scoreb_yrs.R:74:3'): Basic calculations on levels ──────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─convergEU::scoreb_yrs(myTB, timeName = "tautime") at test_scoreb_yrs.R:74:2
   2.   ├─base::`[<-`(`*tmp*`, -1, auxN, value = `<int>`)
   3.   └─tibble:::`[<-.tbl_df`(`*tmp*`, -1, auxN, value = `<int>`)
   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]])
  ── Error ('test_smoo_dataset.R:58:3'): Smoothing: exceptions ───────────────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─base::`[<-`(`*tmp*`, 3, 3, value = `<lgl>`) at test_smoo_dataset.R:58:2
   2. └─tibble:::`[<-.tbl_df`(`*tmp*`, 3, 3, value = `<lgl>`) at test_smoo_dataset.R:58:2
   3.   └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   4.     └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   5.       ├─base::withCallingHandlers(...)
   6.       └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test_upDo_CoDi.R:91:4'): Declarations of convergence downward ───────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─base::`[<-`(`*tmp*`, 2, 2:4, value = `<df[,3]>`) at test_upDo_CoDi.R:91:3
   2. └─tibble:::`[<-.tbl_df`(`*tmp*`, 2, 2:4, value = `<df[,3]>`) at test_upDo_CoDi.R:91:3
   3.   └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   4.     └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   5.       ├─base::withCallingHandlers(...)
   6.       └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test_upDo_CoDi.R:120:3'): Declarations of convergence  weak   ───────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. ├─base::`[<-`(`*tmp*`, 2, 2:4, value = `<df[,3]>`) at test_upDo_CoDi.R:120:2
   2. └─tibble:::`[<-.tbl_df`(`*tmp*`, 2, 2:4, value = `<df[,3]>`) at test_upDo_CoDi.R:120:2
   3.   └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   4.     └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   5.       ├─base::withCallingHandlers(...)
   6.       └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  
  [ FAIL 17 | WARN 0 | SKIP 0 | PASS 593 ]
  Error: Test failures
  Execution halted