Last updated on 2023-03-20 02:51:50 CET.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 0.10.1 | OK | ||||
| r-devel-linux-x86_64-debian-gcc | 0.10.1 | 12.67 | 314.55 | 327.22 | ERROR | |
| r-devel-linux-x86_64-fedora-clang | 0.10.1 | 644.42 | OK | |||
| r-devel-linux-x86_64-fedora-gcc | 0.10.1 | 618.71 | OK | |||
| r-devel-windows-x86_64 | 0.10.1 | 161.00 | 584.00 | 745.00 | OK | |
| r-patched-linux-x86_64 | 0.10.1 | 28.04 | 431.00 | 459.04 | OK | |
| r-release-linux-x86_64 | 0.10.1 | 14.89 | 436.82 | 451.71 | OK | |
| r-release-macos-arm64 | 0.10.1 | 115.00 | OK | |||
| r-release-macos-x86_64 | 0.10.1 | 186.00 | OK | |||
| r-release-windows-x86_64 | 0.10.1 | 82.00 | 479.00 | 561.00 | OK | |
| r-oldrel-macos-arm64 | 0.10.1 | 570.00 | OK | |||
| r-oldrel-macos-x86_64 | 0.10.1 | 204.00 | OK | |||
| r-oldrel-windows-ix86+x86_64 | 0.10.1 | 40.00 | 493.00 | 533.00 | OK |
Version: 0.10.1
Check: examples
Result: ERROR
Running examples in ‘admiral-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: derive_locf_records
> ### Title: Derive LOCF (Last Observation Carried Forward) Records
> ### Aliases: derive_locf_records
> ### Keywords: der_prm_bds_findings
>
> ### ** Examples
>
>
> library(dplyr)
Attaching package: ‘dplyr’
The following object is masked from ‘package:admiral’:
vars
The following objects are masked from ‘package:stats’:
filter, lag
The following objects are masked from ‘package:base’:
intersect, setdiff, setequal, union
> library(tibble)
>
> advs <- tribble(
+ ~STUDYID, ~USUBJID, ~PARAMCD, ~PARAMN, ~AVAL, ~AVISITN, ~AVISIT,
+ "CDISC01", "01-701-1015", "PULSE", 1, 61, 0, "BASELINE",
+ "CDISC01", "01-701-1015", "PULSE", 1, 60, 2, "WEEK 6",
+ "CDISC01", "01-701-1015", "DIABP", 2, 51, 0, "BASELINE",
+ "CDISC01", "01-701-1015", "DIABP", 2, 50, 2, "WEEK 2",
+ "CDISC01", "01-701-1015", "DIABP", 2, 51, 4, "WEEK 4",
+ "CDISC01", "01-701-1015", "DIABP", 2, 50, 6, "WEEK 6",
+ "CDISC01", "01-701-1015", "SYSBP", 3, 121, 0, "BASELINE",
+ "CDISC01", "01-701-1015", "SYSBP", 3, 121, 2, "WEEK 2",
+ "CDISC01", "01-701-1015", "SYSBP", 3, 121, 4, "WEEK 4",
+ "CDISC01", "01-701-1015", "SYSBP", 3, 121, 6, "WEEK 6",
+ "CDISC01", "01-701-1028", "PULSE", 1, 65, 0, "BASELINE",
+ "CDISC01", "01-701-1028", "DIABP", 2, 79, 0, "BASELINE",
+ "CDISC01", "01-701-1028", "DIABP", 2, 80, 2, "WEEK 2",
+ "CDISC01", "01-701-1028", "DIABP", 2, NA, 4, "WEEK 4",
+ "CDISC01", "01-701-1028", "DIABP", 2, NA, 6, "WEEK 6",
+ "CDISC01", "01-701-1028", "SYSBP", 3, 130, 0, "BASELINE",
+ "CDISC01", "01-701-1028", "SYSBP", 3, 132, 2, "WEEK 2"
+ )
>
>
> # A dataset with all the combinations of PARAMCD, PARAM, AVISIT, AVISITN, ... which are expected.
> advs_expected_obsv <- tribble(
+ ~PARAMCD, ~AVISITN, ~AVISIT,
+ "PULSE", 0, "BASELINE",
+ "PULSE", 6, "WEEK 6",
+ "DIABP", 0, "BASELINE",
+ "DIABP", 2, "WEEK 2",
+ "DIABP", 4, "WEEK 4",
+ "DIABP", 6, "WEEK 6",
+ "SYSBP", 0, "BASELINE",
+ "SYSBP", 2, "WEEK 2",
+ "SYSBP", 4, "WEEK 4",
+ "SYSBP", 6, "WEEK 6"
+ )
>
> derive_locf_records(
+ data = advs,
+ dataset_expected_obs = advs_expected_obsv,
+ by_vars = exprs(STUDYID, USUBJID, PARAMCD),
+ order = exprs(AVISITN, AVISIT),
+ keep_vars = exprs(PARAMN)
+ )
Error in vectbl_assign(x[[j]], i, recycled_value[[j]]) :
DLL requires the use of native symbols
Calls: derive_locf_records ... tbl_subassign_row -> withCallingHandlers -> vectbl_assign
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 0.10.1
Check: tests
Result: ERROR
Running ‘testthat.R’ [114s/177s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/tests.html
> # * https://testthat.r-lib.org/reference/test_package.html#special-files
>
> library(testthat)
> library(admiral)
>
> test_check("admiral")
[ FAIL 6 | WARN 134 | SKIP 0 | PASS 595 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-derive_locf_records.R:33:3'): derive_locf_records Test 1: visits are missing ──
Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
Backtrace:
▆
1. ├─admiral::derive_locf_records(...) at test-derive_locf_records.R:33:2
2. │ └─aval_not_missing %>% ...
3. ├─dplyr::full_join(., advs_exp_obsv3, by = c(exp_obs_vars))
4. └─dplyr:::full_join.data.frame(., advs_exp_obsv3, by = c(exp_obs_vars))
5. └─dplyr:::join_mutate(...)
6. ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,6]>`)
7. └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,6]>`)
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]])
── Error ('test-derive_locf_records.R:83:3'): derive_locf_records Test 2: some visits have missing AVAL ──
Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
Backtrace:
▆
1. ├─admiral::derive_locf_records(...) at test-derive_locf_records.R:83:2
2. │ └─aval_not_missing %>% ...
3. ├─dplyr::full_join(., advs_exp_obsv3, by = c(exp_obs_vars))
4. └─dplyr:::full_join.data.frame(., advs_exp_obsv3, by = c(exp_obs_vars))
5. └─dplyr:::join_mutate(...)
6. ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,6]>`)
7. └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,6]>`)
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]])
── Error ('test-derive_locf_records.R:143:3'): derive_locf_records Test 3: visits are missing - and DTYPE already exits ──
Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
Backtrace:
▆
1. ├─admiral::derive_locf_records(...) at test-derive_locf_records.R:143:2
2. │ └─aval_not_missing %>% ...
3. ├─dplyr::full_join(., advs_exp_obsv3, by = c(exp_obs_vars))
4. └─dplyr:::full_join.data.frame(., advs_exp_obsv3, by = c(exp_obs_vars))
5. └─dplyr:::join_mutate(...)
6. ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,6]>`)
7. └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,6]>`)
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]])
── Error ('test-derive_locf_records.R:191:3'): derive_locf_records Test 4: visit variables are parameter independent ──
Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
Backtrace:
▆
1. ├─admiral::derive_locf_records(...) at test-derive_locf_records.R:191:2
2. │ └─aval_not_missing %>% ...
3. ├─dplyr::full_join(., advs_exp_obsv3, by = c(exp_obs_vars))
4. └─dplyr:::full_join.data.frame(., advs_exp_obsv3, by = c(exp_obs_vars))
5. └─dplyr:::join_mutate(...)
6. ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,6]>`)
7. └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,6]>`)
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]])
── Error ('test-derive_locf_records.R:247:3'): derive_locf_records Test 5: visit variables are parameter dependent ──
Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
Backtrace:
▆
1. ├─admiral::derive_locf_records(...) at test-derive_locf_records.R:247:2
2. │ └─aval_not_missing %>% ...
3. ├─dplyr::full_join(., advs_exp_obsv3, by = c(exp_obs_vars))
4. └─dplyr:::full_join.data.frame(., advs_exp_obsv3, by = c(exp_obs_vars))
5. └─dplyr:::join_mutate(...)
6. ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,6]>`)
7. └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,6]>`)
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]])
── Error ('test-derive_locf_records.R:291:3'): derive_locf_records Test 6: populate VISITNUM for LOCF records ──
Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
Backtrace:
▆
1. ├─admiral::derive_locf_records(...) at test-derive_locf_records.R:291:2
2. │ └─aval_not_missing %>% ...
3. ├─dplyr::full_join(., advs_exp_obsv3, by = c(exp_obs_vars))
4. └─dplyr:::full_join.data.frame(., advs_exp_obsv3, by = c(exp_obs_vars))
5. └─dplyr:::join_mutate(...)
6. ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,6]>`)
7. └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,6]>`)
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 6 | WARN 134 | SKIP 0 | PASS 595 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc