Running ‘spelling.R’ [0s/0s]
  Running ‘testthat.R’ [13s/14s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > Sys.setenv("OMP_THREAD_LIMIT" = 2)
  > 
  > library(testthat)
  > library(r2dii.match)
  > 
  > test_check("r2dii.match")
  Saving _problems/test-match_name-25.R
  Found no match via fuzzy matching.
  Saving _problems/test-match_name-68.R
  Saving _problems/test-match_name-81.R
  Found no match via fuzzy matching.
  Saving _problems/test-match_name-129.R
  Found no match via fuzzy matching.
  Saving _problems/test-match_name-140.R
  Found no match via fuzzy matching.
  Saving _problems/test-match_name-174.R
  Saving _problems/test-match_name-185.R
  Saving _problems/test-match_name-191.R
  Saving _problems/test-match_name-203.R
  Saving _problems/test-match_name-215.R
  Saving _problems/test-match_name-233.R
  Saving _problems/test-match_name-248.R
  Saving _problems/test-match_name-257.R
  Saving _problems/test-match_name-263.R
  Saving _problems/test-match_name-267.R
  Saving _problems/test-match_name-272.R
  Saving _problems/test-match_name-285.R
  Saving _problems/test-match_name-296.R
  Saving _problems/test-match_name-309.R
  Saving _problems/test-match_name-313.R
  Saving _problems/test-match_name-319.R
  Saving _problems/test-match_name-357.R
  Saving _problems/test-match_name-372.R
  Saving _problems/test-match_name-462.R
  Found no match via fuzzy matching.
  Saving _problems/test-match_name-499.R
  Saving _problems/test-match_name-510.R
  Saving _problems/test-match_name-516.R
  Saving _problems/test-match_name-517.R
  Saving _problems/test-match_name-585.R
  Saving _problems/test-match_name-591.R
  Saving _problems/test-match_name-604.R
  Saving _problems/test-match_name-620.R
  Saving _problems/test-match_name-637.R
  Found no match via fuzzy matching.
  Saving _problems/test-match_name-670.R
  Saving _problems/test-match_name-712.R
  Found no match via fuzzy matching.
  Saving _problems/test-match_name-828.R
  Saving _problems/test-match_name-856.R
  Saving _problems/test-prioritize-9.R
  Found no match via fuzzy matching.
  Saving _problems/test-prioritize-253.R
  [ FAIL 39 | WARN 0 | SKIP 1 | PASS 136 ]
  
  ══ Skipped tests (1) ═══════════════════════════════════════════════════════════
  • Not run in R CMD check (env var `R_CMD` is set) (1):
    'test-data_dictionary.R:3:5'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-match_name.R:25:3'): w/ non-NA only at intermediate level yields matches at intermediate
            level only ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. └─r2dii.match::match_name(lbk, abcd) at test-match_name.R:25:3
   2.   └─r2dii.match:::match_name_impl(...)
   3.     ├─...[]
   4.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:68:3'): w/ 1 lbk row matching 1 abcd company in 2 sectors outputs 2 rows ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. └─r2dii.match::match_name(lbk, abcd, by_sector = FALSE) at test-match_name.R:68:3
   2.   └─r2dii.match:::match_name_impl(...)
   3.     ├─...[]
   4.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:76:3'): `by_sector = TRUE` yields only matching sectors ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. ├─... %>% filter(sector != sector_abcd) at test-match_name.R:76:3
   2. ├─dplyr::filter(., sector != sector_abcd)
   3. └─r2dii.match::match_name(fake_lbk(), fake_abcd(), by_sector = TRUE)
   4.   └─r2dii.match:::match_name_impl(...)
   5.     ├─...[]
   6.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:126:3'): w/ row 1 of loanbook and crucial cols yields expected ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(match_name(fake_lbk(), fake_abcd()), expected) at test-match_name.R:126:3
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─r2dii.match::match_name(fake_lbk(), fake_abcd())
   5.   └─r2dii.match:::match_name_impl(...)
   6.     ├─...[]
   7.     └─data.table:::`[.data.table`(...)
  ── Failure ('test-match_name.R:140:3'): takes unprepared loanbook and abcd datasets ──
  Expected `match_name(slice(r2dii.data::loanbook_demo, 1), r2dii.data::abcd_demo)` not to throw any errors.
  Actually got a <simpleError> with message:
    attempt access index 10/10 in VECTOR_ELT
  Backtrace:
       ▆
    1. ├─r2dii.match:::expect_no_error(...) at test-match_name.R:140:3
    2. │ └─testthat::expect_error(regexp = NA, ...) at ./helper-cnd.R:4:3
    3. │   └─testthat:::expect_condition_matching_(...)
    4. │     └─testthat:::quasi_capture(...)
    5. │       ├─testthat (local) .capture(...)
    6. │       │ └─base::withCallingHandlers(...)
    7. │       └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    8. └─r2dii.match::match_name(...)
    9.   └─r2dii.match:::match_name_impl(...)
   10.     ├─...[]
   11.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:171:3'): w/ 2 lbk rows matching 2 abcd rows, yields expected names ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. ├─testthat::expect_named(...) at test-match_name.R:171:3
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─r2dii.match::match_name(lbk45, r2dii.data::abcd_demo)
   5.   └─r2dii.match:::match_name_impl(...)
   6.     ├─...[]
   7.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:182:3'): w/ 1 lbk row matching ultimate, yields expected names ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. ├─testthat::expect_named(...) at test-match_name.R:182:3
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─r2dii.match::match_name(lbk1, r2dii.data::abcd_demo)
   5.   └─r2dii.match:::match_name_impl(...)
   6.     ├─...[]
   7.     └─data.table:::`[.data.table`(...)
  ── Failure ('test-match_name.R:189:3'): takes `min_score` ──────────────────────
  Expected `match_name(...)` not to throw any errors.
  Actually got a <simpleError> with message:
    attempt access index 10/10 in VECTOR_ELT
  Backtrace:
       ▆
    1. ├─r2dii.match:::expect_no_error(...) at test-match_name.R:189:3
    2. │ └─testthat::expect_error(regexp = NA, ...) at ./helper-cnd.R:4:3
    3. │   └─testthat:::expect_condition_matching_(...)
    4. │     └─testthat:::quasi_capture(...)
    5. │       ├─testthat (local) .capture(...)
    6. │       │ └─base::withCallingHandlers(...)
    7. │       └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    8. └─r2dii.match::match_name(...)
    9.   └─r2dii.match:::match_name_impl(...)
   10.     ├─...[]
   11.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:198:3'): takes `method` ───────────────────────────
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. ├─testthat::expect_false(...) at test-match_name.R:198:3
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. ├─base::identical(...)
   5. └─r2dii.match::match_name(lbk_method, r2dii.data::abcd_demo, method = "jw")
   6.   └─r2dii.match:::match_name_impl(...)
   7.     ├─...[]
   8.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:210:3'): takes `p` ────────────────────────────────
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. ├─testthat::expect_false(...) at test-match_name.R:210:3
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. ├─base::identical(...)
   5. └─r2dii.match::match_name(lbk_p, r2dii.data::abcd_demo, p = 0.1)
   6.   └─r2dii.match:::match_name_impl(...)
   7.     ├─...[]
   8.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:228:3'): takes `overwrite` ────────────────────────
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. ├─testthat::expect_false(...) at test-match_name.R:228:3
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. ├─base::identical(...)
   5. └─r2dii.match::match_name(lbk, r2dii.data::abcd_demo, overwrite = NULL)
   6.   └─r2dii.match:::match_name_impl(...)
   7.     ├─...[]
   8.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:245:3'): warns overwrite ──────────────────────────
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
       ▆
    1. ├─testthat::expect_warning(...) at test-match_name.R:245:3
    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. └─r2dii.match::match_name(lbk, r2dii.data::abcd_demo, overwrite = overwrite_demo)
    8.   └─r2dii.match:::match_name_impl(...)
    9.     ├─...[]
   10.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:252:3'): recovers `sector_lbk` ────────────────────
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
       ▆
    1. ├─testthat::expect_true(...) at test-match_name.R:252:3
    2. │ └─testthat::quasi_label(enquo(object), label)
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─rlang::has_name(...)
    5. │ ├─name %in% names2(x)
    6. │ └─rlang::names2(x)
    7. └─r2dii.match::match_name(...)
    8.   └─r2dii.match:::match_name_impl(...)
    9.     ├─...[]
   10.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:261:3'): recovers `sector_abcd` ───────────────────
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
       ▆
    1. ├─testthat::expect_true(...) at test-match_name.R:261:3
    2. │ └─testthat::quasi_label(enquo(object), label)
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─rlang::has_name(...)
    5. │ ├─name %in% names2(x)
    6. │ └─rlang::names2(x)
    7. └─r2dii.match::match_name(r2dii.data::loanbook_demo, r2dii.data::abcd_demo)
    8.   └─r2dii.match:::match_name_impl(...)
    9.     ├─...[]
   10.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:267:3'): outputs name from loanbook, not name.y (bug fix) ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. └─r2dii.match::match_name(...) at test-match_name.R:267:3
   2.   └─r2dii.match:::match_name_impl(...)
   3.     ├─...[]
   4.     └─data.table:::`[.data.table`(...)
  ── Failure ('test-match_name.R:272:3'): works with `min_score = 0` (bug fix) ───
  Expected `match_name(...)` not to throw any errors.
  Actually got a <simpleError> with message:
    attempt access index 10/10 in VECTOR_ELT
  Backtrace:
       ▆
    1. ├─r2dii.match:::expect_no_error(...) at test-match_name.R:272:3
    2. │ └─testthat::expect_error(regexp = NA, ...) at ./helper-cnd.R:4:3
    3. │   └─testthat:::expect_condition_matching_(...)
    4. │     └─testthat:::quasi_capture(...)
    5. │       ├─testthat (local) .capture(...)
    6. │       │ └─base::withCallingHandlers(...)
    7. │       └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    8. └─r2dii.match::match_name(...)
    9.   └─r2dii.match:::match_name_impl(...)
   10.     ├─...[]
   11.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:281:3'): outputs only perfect matches if any (#40 @2diiKlaus) ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. ├─... %>% pull(score) at test-match_name.R:281:3
   2. ├─dplyr::pull(., score)
   3. ├─dplyr::filter(., alias == this_alias)
   4. ├─dplyr::mutate(., alias = to_alias(name))
   5. └─r2dii.match::match_name(., r2dii.data::abcd_demo)
   6.   └─r2dii.match:::match_name_impl(...)
   7.     ├─...[]
   8.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:296:3'): match_name()$level lacks prefix 'name_' suffix '_lbk' ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. └─r2dii.match::match_name(...) at test-match_name.R:296:3
   2.   └─r2dii.match:::match_name_impl(...)
   3.     ├─...[]
   4.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:309:3'): preserves groups ─────────────────────────
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. ├─testthat::expect_true(...) at test-match_name.R:309:3
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. ├─dplyr::is_grouped_df(match_name(grouped_loanbook, r2dii.data::abcd_demo))
   5. └─r2dii.match::match_name(grouped_loanbook, r2dii.data::abcd_demo)
   6.   └─r2dii.match:::match_name_impl(...)
   7.     ├─...[]
   8.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:313:3'): outputs id consistent with level ─────────
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. ├─slice(r2dii.data::loanbook_demo, 6) %>% ... at test-match_name.R:313:3
   2. └─r2dii.match::match_name(., r2dii.data::abcd_demo)
   3.   └─r2dii.match:::match_name_impl(...)
   4.     ├─...[]
   5.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:319:3'): no longer yiels all NAs in lbk columns (#85 @jdhoffa) ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. └─r2dii.match::match_name(r2dii.data::loanbook_demo, r2dii.data::abcd_demo) at test-match_name.R:319:3
   2.   └─r2dii.match:::match_name_impl(...)
   3.     ├─...[]
   4.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:357:3'): handles any number of intermediate_parent columns (#84) ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. └─r2dii.match::match_name(lbk_mini, fake_abcd()) at test-match_name.R:357:3
   2.   └─r2dii.match:::match_name_impl(...)
   3.     ├─...[]
   4.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:369:3'): warns/errors if some/all system classification is unknown ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
       ▆
    1. ├─testthat::expect_warning(...) at test-match_name.R:369:3
    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. └─r2dii.match::match_name(some_bad_system, fake_abcd())
    8.   └─r2dii.match:::match_name_impl(...)
    9.     ├─...[]
   10.     └─data.table:::`[.data.table`(...)
  ── Failure ('test-match_name.R:462:3'): with bad input errors gracefully ───────
  Expected `match_name(bad_loanbook, r2dii.data::abcd_demo)` not to throw any errors.
  Actually got a <simpleError> with message:
    attempt access index 10/10 in VECTOR_ELT
  Backtrace:
       ▆
    1. ├─r2dii.match:::expect_no_error(match_name(bad_loanbook, r2dii.data::abcd_demo)) at test-match_name.R:462:3
    2. │ └─testthat::expect_error(regexp = NA, ...) at ./helper-cnd.R:4:3
    3. │   └─testthat:::expect_condition_matching_(...)
    4. │     └─testthat:::quasi_capture(...)
    5. │       ├─testthat (local) .capture(...)
    6. │       │ └─base::withCallingHandlers(...)
    7. │       └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    8. └─r2dii.match::match_name(bad_loanbook, r2dii.data::abcd_demo)
    9.   └─r2dii.match:::match_name_impl(...)
   10.     ├─...[]
   11.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:495:3'): w/ mismatching sector_classification and `by_sector = FALSE` yields
            a match ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. └─r2dii.match::match_name(...) at test-match_name.R:495:3
   2.   └─r2dii.match:::match_name_impl(...)
   3.     ├─...[]
   4.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:505:3'): takes `by_sector` ────────────────────────
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. ├─testthat::expect_false(...) at test-match_name.R:505:3
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. ├─base::identical(...)
   5. └─r2dii.match::match_name(...)
   6.   └─r2dii.match:::match_name_impl(...)
   7.     ├─...[]
   8.     └─data.table:::`[.data.table`(...)
  ── Failure ('test-match_name.R:516:3'): w/ duplicates in abcd throws now error; instead remove duplicates ──
  Expected `out <- match_name(fake_lbk(), dupl)` not to throw any errors.
  Actually got a <simpleError> with message:
    attempt access index 10/10 in VECTOR_ELT
  Backtrace:
       ▆
    1. ├─testthat::expect_error(out <- match_name(fake_lbk(), dupl), NA) at test-match_name.R:516:3
    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. └─r2dii.match::match_name(fake_lbk(), dupl)
    8.   └─r2dii.match:::match_name_impl(...)
    9.     ├─...[]
   10.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:517:3'): w/ duplicates in abcd throws now error; instead remove duplicates ──
  Error in `eval(code, test_env)`: object 'out' not found
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(nrow(out), 1L) at test-match_name.R:517:3
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─base::nrow(out)
  ── Error ('test-match_name.R:585:3'): outputs correct `borderline` (#269) ──────
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. └─r2dii.match::match_name(lbk, abcd) at test-match_name.R:585:3
   2.   └─r2dii.match:::match_name_impl(...)
   3.     ├─...[]
   4.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:591:3'): matches any case of abcd$sector, but converts sector to lowercase ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. └─r2dii.match::match_name(fake_lbk(), fake_abcd(sector = "power")) at test-match_name.R:591:3
   2.   └─r2dii.match:::match_name_impl(...)
   3.     ├─...[]
   4.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:604:3'): matches any case of abcd$name_company, but preserves original case ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. └─r2dii.match::match_name(fake_lbk(), fake_abcd(name_company = "alpine knits")) at test-match_name.R:604:3
   2.   └─r2dii.match:::match_name_impl(...)
   3.     ├─...[]
   4.     └─data.table:::`[.data.table`(...)
  ── Failure ('test-match_name.R:620:3'): with arguments passed via ellipsis, throws no error (#310) ──
  Expected `match_name(fake_lbk(), fake_abcd(), method = "qgram", q = 1)` not to throw any errors.
  Actually got a <simpleError> with message:
    attempt access index 10/10 in VECTOR_ELT
  Backtrace:
       ▆
    1. ├─r2dii.match:::expect_no_error(...) at test-match_name.R:620:3
    2. │ └─testthat::expect_error(regexp = NA, ...) at ./helper-cnd.R:4:3
    3. │   └─testthat:::expect_condition_matching_(...)
    4. │     └─testthat:::quasi_capture(...)
    5. │       ├─testthat (local) .capture(...)
    6. │       │ └─base::withCallingHandlers(...)
    7. │       └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    8. └─r2dii.match::match_name(...)
    9.   └─r2dii.match:::match_name_impl(...)
   10.     ├─...[]
   11.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:637:3'): with arguments passed via ellipsis, outputs the expected score ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. └─r2dii.match::match_name(lbk, abcd, method = "qgram", q = this_q) at test-match_name.R:637:3
   2.   └─r2dii.match:::match_name_impl(...)
   3.     ├─...[]
   4.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:670:3'): w/ loanbook w/ reserved cols, outputs sector not i.sector (#330) ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. └─r2dii.match::match_name(reserved, fake_abcd()) at test-match_name.R:670:3
   2.   └─r2dii.match:::match_name_impl(...)
   3.     ├─...[]
   4.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:712:3'): allows custom `sector_classification` ────
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. └─r2dii.match::match_name(loanbook, abcd, sector_classification = custom_classification) at test-match_name.R:712:3
   2.   └─r2dii.match:::match_name_impl(...)
   3.     ├─...[]
   4.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:824:3'): with `join_id` and one ID match, one fuzzy match, outputs as expected (#135) ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. └─r2dii.match::match_name(loanbook, abcd, join_id = c(lei_direct_loantaker = "lei")) at test-match_name.R:824:3
   2.   └─r2dii.match:::match_name_impl(...)
   3.     ├─...[]
   4.     └─data.table:::`[.data.table`(...)
  ── Error ('test-match_name.R:852:3'): columns in output match what is documented in `data_dictionary` ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. └─r2dii.match::match_name(loanbook = loanbook, abcd = abcd, join_id = c(lei_direct_loantaker = "lei")) at test-match_name.R:852:3
   2.   └─r2dii.match:::match_name_impl(...)
   3.     ├─...[]
   4.     └─data.table:::`[.data.table`(...)
  ── Failure ('test-prioritize.R:4:3'): w/ full demo datasets throws no error ────
  Expected ``%>%`(...)` not to throw any errors.
  Actually got a <simpleError> with message:
    attempt access index 10/10 in VECTOR_ELT
  Backtrace:
       ▆
    1. ├─r2dii.match:::expect_no_error(...) at test-prioritize.R:4:3
    2. │ └─testthat::expect_error(regexp = NA, ...) at ./helper-cnd.R:4:3
    3. │   └─testthat:::expect_condition_matching_(...)
    4. │     └─testthat:::quasi_capture(...)
    5. │       ├─testthat (local) .capture(...)
    6. │       │ └─base::withCallingHandlers(...)
    7. │       └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    8. ├─... %>% prioritize(priority = "ultimate_parent")
    9. ├─r2dii.match::prioritize(., priority = "ultimate_parent")
   10. │ └─r2dii.match:::has_zero_rows(data)
   11. │   └─base::nrow(data)
   12. └─r2dii.match::match_name(., r2dii.data::abcd_demo)
   13.   └─r2dii.match:::match_name_impl(...)
   14.     ├─...[]
   15.     └─data.table:::`[.data.table`(...)
  ── Error ('test-prioritize.R:253:3'): columns in output match what is documented in `data_dictionary` ──
  Error in ``[.data.table`(matched, , `:=`(pick, none_is_one(score) | some_is_one(score)), by = id_2dii)`: attempt access index 10/10 in VECTOR_ELT
  Backtrace:
      ▆
   1. └─r2dii.match::match_name(lbk, abcd) at test-prioritize.R:253:3
   2.   └─r2dii.match:::match_name_impl(...)
   3.     ├─...[]
   4.     └─data.table:::`[.data.table`(...)
  
  [ FAIL 39 | WARN 0 | SKIP 1 | PASS 136 ]
  Error:
  ! Test failures.
  Execution halted