Running ‘testthat.R’ [29s/33s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(rangeMapper)
  rangeMapper 2.0.3
  > 
  > test_check("rangeMapper")
  Saving _problems/test-3_subsets-28.R
  Saving _problems/test-3_subsets-65.R
  Saving _problems/test-3_subsets-75.R
  Saving _problems/test-4_maps-7.R
  Saving _problems/test-5_get-6.R
  [ FAIL 5 | WARN 0 | SKIP 0 | PASS 35 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-3_subsets.R:26:5'): rmap_save_subset returns TRUE ──────────────
  Error in ``[.data.table`(W, type == "map", `:=`(joinCall, paste("JOIN", name, "ON", "c.cell_id = ", name, ".cell_id", collapse = "")), by = pk)`: attempt access index 5/5 in VECTOR_ELT
  Backtrace:
      ▆
   1. ├─testthat::expect_true(rmap_save_subset(con, "s1", species_richness = "species_richness > 10")) at test-3_subsets.R:26:5
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. ├─rangeMapper::rmap_save_subset(con, "s1", species_richness = "species_richness > 10")
   5. └─rangeMapper::rmap_save_subset(con, "s1", species_richness = "species_richness > 10")
   6.   ├─...[]
   7.   └─data.table:::`[.data.table`(...)
  ── Error ('test-3_subsets.R:61:5'): rmap_save_subset works with LIKE ───────────
  Error in ``[.data.table`(W, type == "map", `:=`(joinCall, paste("JOIN", name, "ON", "c.cell_id = ", name, ".cell_id", collapse = "")), by = pk)`: attempt access index 5/5 in VECTOR_ELT
  Backtrace:
      ▆
   1. ├─testthat::expect_true(rmap_save_subset(con, "s1", wrens = "female_tarsus BETWEEN 20 and 30 AND subspecies > 1 AND com_name LIKE  \"%-wren%\" ")) at test-3_subsets.R:61:5
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. ├─rangeMapper::rmap_save_subset(con, "s1", wrens = "female_tarsus BETWEEN 20 and 30 AND subspecies > 1 AND com_name LIKE  \"%-wren%\" ")
   5. └─rangeMapper::rmap_save_subset(con, "s1", wrens = "female_tarsus BETWEEN 20 and 30 AND subspecies > 1 AND com_name LIKE  \"%-wren%\" ")
   6.   ├─...[]
   7.   └─data.table:::`[.data.table`(...)
  ── Error ('test-3_subsets.R:71:5'): rmap_save_subset works with where > (select .... )  ──
  Error in ``[.data.table`(W, type == "map", `:=`(joinCall, paste("JOIN", name, "ON", "c.cell_id = ", name, ".cell_id", collapse = "")), by = pk)`: attempt access index 5/5 in VECTOR_ELT
  Backtrace:
      ▆
   1. ├─testthat::expect_true(rmap_save_subset(con, "s1", wrens = "clutch_size > (SELECT avg(clutch_size) from wrens)")) at test-3_subsets.R:71:5
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. ├─rangeMapper::rmap_save_subset(con, "s1", wrens = "clutch_size > (SELECT avg(clutch_size) from wrens)")
   5. └─rangeMapper::rmap_save_subset(con, "s1", wrens = "clutch_size > (SELECT avg(clutch_size) from wrens)")
   6.   ├─...[]
   7.   └─data.table:::`[.data.table`(...)
  ── Error ('test-4_maps.R:7:1'): (code run outside of `test_that()`) ────────────
  Error in ``[.data.table`(W, type == "map", `:=`(joinCall, paste("JOIN", name, "ON", "c.cell_id = ", name, ".cell_id", collapse = "")), by = pk)`: attempt access index 5/5 in VECTOR_ELT
  Backtrace:
      ▆
   1. ├─rangeMapper::rmap_save_subset(con, "s1", wrens = "clutch_size > 2") at test-4_maps.R:7:1
   2. └─rangeMapper::rmap_save_subset(con, "s1", wrens = "clutch_size > 2")
   3.   ├─...[]
   4.   └─data.table:::`[.data.table`(...)
  ── Error ('test-5_get.R:6:1'): (code run outside of `test_that()`) ─────────────
  Error in ``[.data.table`(W, type == "map", `:=`(joinCall, paste("JOIN", name, "ON", "c.cell_id = ", name, ".cell_id", collapse = "")), by = pk)`: attempt access index 5/5 in VECTOR_ELT
  Backtrace:
      ▆
   1. ├─rangeMapper::rmap_save_subset(con, dst = "ss1", species_richness = "species_richness > 10") at test-5_get.R:6:1
   2. └─rangeMapper::rmap_save_subset(con, dst = "ss1", species_richness = "species_richness > 10")
   3.   ├─...[]
   4.   └─data.table:::`[.data.table`(...)
  
  [ FAIL 5 | WARN 0 | SKIP 0 | PASS 35 ]
  Error:
  ! Test failures.
  Warning message:
  call dbDisconnect() when finished working with a connection 
  Execution halted