Last updated on 2025-12-20 02:49:56 CET.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 1.0.0 | 3.49 | 45.80 | 49.29 | NOTE | |
| r-devel-linux-x86_64-debian-gcc | 1.0.0 | 2.39 | 28.58 | 30.97 | ERROR | |
| r-devel-linux-x86_64-fedora-clang | 1.0.0 | 7.00 | 58.45 | 65.45 | ERROR | |
| r-devel-linux-x86_64-fedora-gcc | 1.0.0 | 6.00 | 55.04 | 61.04 | ERROR | |
| r-devel-windows-x86_64 | 1.0.0 | 7.00 | 62.00 | 69.00 | NOTE | |
| r-patched-linux-x86_64 | 1.0.0 | 4.65 | 35.21 | 39.86 | NOTE | |
| r-release-linux-x86_64 | 1.0.0 | 3.80 | 35.22 | 39.02 | NOTE | |
| r-release-macos-arm64 | 1.0.0 | NOTE | ||||
| r-release-macos-x86_64 | 1.0.0 | 3.00 | 40.00 | 43.00 | NOTE | |
| r-release-windows-x86_64 | 1.0.0 | 6.00 | 59.00 | 65.00 | NOTE | |
| r-oldrel-macos-arm64 | 1.0.0 | NOTE | ||||
| r-oldrel-macos-x86_64 | 1.0.0 | 3.00 | 32.00 | 35.00 | NOTE | |
| r-oldrel-windows-x86_64 | 1.0.0 | 8.00 | 71.00 | 79.00 | NOTE |
Version: 1.0.0
Check: Rd files
Result: NOTE
checkRd: (-1) stat_quantile_prob.Rd:14: Lost braces; missing escapes or markup?
14 | Number {25, 50, 75}
| ^
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc, r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-devel-windows-x86_64, r-patched-linux-x86_64, r-release-linux-x86_64, r-release-macos-arm64, r-release-macos-x86_64, r-release-windows-x86_64, r-oldrel-macos-arm64, r-oldrel-macos-x86_64, r-oldrel-windows-x86_64
Version: 1.0.0
Check: examples
Result: ERROR
Running examples in ‘polypharmacy-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: ind_simult
> ### Title: Assess polypharmacy based on the daily simultaneous consumption
> ### of medications
> ### Aliases: ind_simult
>
> ### ** Examples
>
> rx1 <- data.frame(id = c(1, 1, 2),
+ code = c("A", "B", "A"),
+ date = c("2000-01-01", "2000-01-04", "2000-01-08"),
+ duration = c(5, 7, 5))
> cohort1 <- data.frame(id = as.numeric(1:3),
+ age = c(45, 12, 89),
+ sex = c("F", "F", "M"))
> rx_proc1 <- data_process(Rx_deliv = rx1, Rx_id = "id", Rx_drug_code = "code",
+ Rx_drug_deliv = "date", Rx_deliv_dur = "duration",
+ Cohort = cohort1, Cohort_id = "id",
+ study_start = "2000-01-01", study_end = "2000-01-15",
+ cores = 1)
Error in `[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, :
attempt access index 6/6 in VECTOR_ELT
Calls: data_process -> data_process.1_core -> [ -> [.data.table
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 1.0.0
Check: tests
Result: ERROR
Running ‘testthat.R’ [2s/4s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(polypharmacy)
>
> test_check("polypharmacy")
Attaching package: 'data.table'
The following object is masked from 'package:base':
%notin%
Saving _problems/test-data_process-87.R
Saving _problems/test-data_process-119.R
Saving _problems/test-data_process-146.R
Saving _problems/test-data_process-167.R
Saving _problems/test-data_process-221.R
Saving _problems/test-data_process-259.R
Saving _problems/test-data_process-292.R
Saving _problems/test-data_process-336.R
Saving _problems/test-data_process-388.R
Saving _problems/test-ind_simult-17.R
Saving _problems/test-ind_stdcontinuous-13.R
Saving _problems/test-ind_stdcumul-17.R
Saving _problems/test-ind_ucontinuous-17.R
Saving _problems/test-ind_wcumul-17.R
[ FAIL 14 | WARN 0 | SKIP 0 | PASS 18 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-data_process.R:68:3'): data_process.hosp_stays ─────────────────
Error in ``[.data.table`(Rx_deliv, sunique(c(idx, idx + 1)), `:=`(by_hosp, cumsum(hosp)), .(id, drug_code))`: attempt access index 7/7 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:68:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test-data_process.R:102:3'): data_process.hosp_stays_many ───────────
Error in ``[.data.table`(Hosp_stays, idx, `:=`(diff, tx_start - shift(tx_end)), .(id))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:102:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─Hosp_stays[idx, `:=`(diff, tx_start - shift(tx_end)), .(id)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-data_process.R:133:3'): data_process.hosp_stays_more_many ──────
Error in ``[.data.table`(Hosp_stays, idx, `:=`(diff, tx_start - shift(tx_end)), .(id))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:133:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─Hosp_stays[idx, `:=`(diff, tx_start - shift(tx_end)), .(id)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-data_process.R:157:3'): data_process.study_dates ───────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:157:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test-data_process.R:209:3'): data_process.grace_factr ───────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:209:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test-data_process.R:250:3'): data_process.grace_cst ─────────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:250:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test-data_process.R:283:3'): data_process.grace_fctr_cst ────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:283:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test-data_process.R:324:3'): data_process.max_reserve ───────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:324:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test-data_process.R:375:3'): data_process.hospit_grace ──────────────
Error in ``[.data.table`(Hosp_stays, idx, `:=`(diff, tx_start - shift(tx_end)), .(id))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:375:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─Hosp_stays[idx, `:=`(diff, tx_start - shift(tx_end)), .(id)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-ind_simult.R:13:3'): ind_simult ────────────────────────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─polypharmacy::data_process(...) at test-ind_simult.R:13:3
2. └─polypharmacy::data_process.1_core(...)
3. ├─...[]
4. └─data.table:::`[.data.table`(...)
── Error ('test-ind_stdcontinuous.R:9:3'): ind_stdcontinuous ───────────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─polypharmacy::data_process(...) at test-ind_stdcontinuous.R:9:3
2. └─polypharmacy::data_process.1_core(...)
3. ├─...[]
4. └─data.table:::`[.data.table`(...)
── Error ('test-ind_stdcumul.R:13:3'): ind_stdcumul ────────────────────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─polypharmacy::data_process(...) at test-ind_stdcumul.R:13:3
2. └─polypharmacy::data_process.1_core(...)
3. ├─...[]
4. └─data.table:::`[.data.table`(...)
── Error ('test-ind_ucontinuous.R:13:3'): ind_ucontinuous ──────────────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─polypharmacy::data_process(...) at test-ind_ucontinuous.R:13:3
2. └─polypharmacy::data_process.1_core(...)
3. ├─...[]
4. └─data.table:::`[.data.table`(...)
── Error ('test-ind_wcumul.R:13:3'): ind_wcumul ────────────────────────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─polypharmacy::data_process(...) at test-ind_wcumul.R:13:3
2. └─polypharmacy::data_process.1_core(...)
3. ├─...[]
4. └─data.table:::`[.data.table`(...)
[ FAIL 14 | WARN 0 | SKIP 0 | PASS 18 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 1.0.0
Check: examples
Result: ERROR
Running examples in ‘polypharmacy-Ex.R’ failed
The error most likely occurred in:
> ### Name: ind_simult
> ### Title: Assess polypharmacy based on the daily simultaneous consumption
> ### of medications
> ### Aliases: ind_simult
>
> ### ** Examples
>
> rx1 <- data.frame(id = c(1, 1, 2),
+ code = c("A", "B", "A"),
+ date = c("2000-01-01", "2000-01-04", "2000-01-08"),
+ duration = c(5, 7, 5))
> cohort1 <- data.frame(id = as.numeric(1:3),
+ age = c(45, 12, 89),
+ sex = c("F", "F", "M"))
> rx_proc1 <- data_process(Rx_deliv = rx1, Rx_id = "id", Rx_drug_code = "code",
+ Rx_drug_deliv = "date", Rx_deliv_dur = "duration",
+ Cohort = cohort1, Cohort_id = "id",
+ study_start = "2000-01-01", study_end = "2000-01-15",
+ cores = 1)
Error in `[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, :
attempt access index 6/6 in VECTOR_ELT
Calls: data_process -> data_process.1_core -> [ -> [.data.table
Execution halted
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc
Version: 1.0.0
Check: tests
Result: ERROR
Running ‘testthat.R’
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(polypharmacy)
>
> test_check("polypharmacy")
Attaching package: 'data.table'
The following object is masked from 'package:base':
%notin%
Saving _problems/test-data_process-87.R
Saving _problems/test-data_process-119.R
Saving _problems/test-data_process-146.R
Saving _problems/test-data_process-167.R
Saving _problems/test-data_process-221.R
Saving _problems/test-data_process-259.R
Saving _problems/test-data_process-292.R
Saving _problems/test-data_process-336.R
Saving _problems/test-data_process-388.R
Saving _problems/test-ind_simult-17.R
Saving _problems/test-ind_stdcontinuous-13.R
Saving _problems/test-ind_stdcumul-17.R
Saving _problems/test-ind_ucontinuous-17.R
Saving _problems/test-ind_wcumul-17.R
[ FAIL 14 | WARN 0 | SKIP 0 | PASS 18 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-data_process.R:68:3'): data_process.hosp_stays ─────────────────
Error in ``[.data.table`(Rx_deliv, sunique(c(idx, idx + 1)), `:=`(by_hosp, cumsum(hosp)), .(id, drug_code))`: attempt access index 7/7 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:68:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test-data_process.R:102:3'): data_process.hosp_stays_many ───────────
Error in ``[.data.table`(Hosp_stays, idx, `:=`(diff, tx_start - shift(tx_end)), .(id))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:102:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─Hosp_stays[idx, `:=`(diff, tx_start - shift(tx_end)), .(id)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-data_process.R:133:3'): data_process.hosp_stays_more_many ──────
Error in ``[.data.table`(Hosp_stays, idx, `:=`(diff, tx_start - shift(tx_end)), .(id))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:133:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─Hosp_stays[idx, `:=`(diff, tx_start - shift(tx_end)), .(id)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-data_process.R:157:3'): data_process.study_dates ───────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:157:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test-data_process.R:209:3'): data_process.grace_factr ───────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:209:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test-data_process.R:250:3'): data_process.grace_cst ─────────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:250:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test-data_process.R:283:3'): data_process.grace_fctr_cst ────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:283:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test-data_process.R:324:3'): data_process.max_reserve ───────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:324:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─...[]
7. └─data.table:::`[.data.table`(...)
── Error ('test-data_process.R:375:3'): data_process.hospit_grace ──────────────
Error in ``[.data.table`(Hosp_stays, idx, `:=`(diff, tx_start - shift(tx_end)), .(id))`: attempt access index 3/3 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-data_process.R:375:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─polypharmacy::data_process(...)
5. └─polypharmacy::data_process.1_core(...)
6. ├─Hosp_stays[idx, `:=`(diff, tx_start - shift(tx_end)), .(id)]
7. └─data.table:::`[.data.table`(...)
── Error ('test-ind_simult.R:13:3'): ind_simult ────────────────────────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─polypharmacy::data_process(...) at test-ind_simult.R:13:3
2. └─polypharmacy::data_process.1_core(...)
3. ├─...[]
4. └─data.table:::`[.data.table`(...)
── Error ('test-ind_stdcontinuous.R:9:3'): ind_stdcontinuous ───────────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─polypharmacy::data_process(...) at test-ind_stdcontinuous.R:9:3
2. └─polypharmacy::data_process.1_core(...)
3. ├─...[]
4. └─data.table:::`[.data.table`(...)
── Error ('test-ind_stdcumul.R:13:3'): ind_stdcumul ────────────────────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─polypharmacy::data_process(...) at test-ind_stdcumul.R:13:3
2. └─polypharmacy::data_process.1_core(...)
3. ├─...[]
4. └─data.table:::`[.data.table`(...)
── Error ('test-ind_ucontinuous.R:13:3'): ind_ucontinuous ──────────────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─polypharmacy::data_process(...) at test-ind_ucontinuous.R:13:3
2. └─polypharmacy::data_process.1_core(...)
3. ├─...[]
4. └─data.table:::`[.data.table`(...)
── Error ('test-ind_wcumul.R:13:3'): ind_wcumul ────────────────────────────────
Error in ``[.data.table`(Rx_deliv, Rx_deliv[, .I[.N > 1], .(id, drug_code)]$V1, `:=`(diff, tx_start - shift(tx_end) - 1L), .(id, drug_code))`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. └─polypharmacy::data_process(...) at test-ind_wcumul.R:13:3
2. └─polypharmacy::data_process.1_core(...)
3. ├─...[]
4. └─data.table:::`[.data.table`(...)
[ FAIL 14 | WARN 0 | SKIP 0 | PASS 18 ]
Error:
! Test failures.
Execution halted
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc