- using R Under development (unstable) (2026-08-10 r90389 ucrt)
- using platform: x86_64-w64-mingw32
- R was compiled by
gcc.exe (GCC) 14.3.0
GNU Fortran (GCC) 14.3.0
- running under: Windows Server 2022 x64 (build 20348)
- using session charset: UTF-8
* current time: 2026-08-11 12:59:04 UTC
- checking for file 'bartCause/DESCRIPTION' ... OK
- this is package 'bartCause' version '1.0-10'
- checking package namespace information ... OK
- checking package dependencies ... OK
- checking if this is a source package ... OK
- checking if there is a namespace ... OK
- checking for hidden files and directories ... OK
- checking for portable file names ... OK
- checking whether package 'bartCause' can be installed ... OK
See the install log for details.
- checking installed package size ... OK
- checking package directory ... OK
- checking DESCRIPTION meta-information ... OK
- checking top-level files ... OK
- checking for left-over files ... OK
- checking index information ... OK
- checking package subdirectories ... OK
- checking code files for non-ASCII characters ... OK
- checking R files for syntax errors ... OK
- checking whether the package can be loaded ... [0s] OK
- checking whether the package can be loaded with stated dependencies ... [0s] OK
- checking whether the package can be unloaded cleanly ... [0s] OK
- checking whether the namespace can be loaded with stated dependencies ... [0s] OK
- checking whether the namespace can be unloaded cleanly ... [1s] OK
- checking loading without being on the library search path ... [0s] OK
- checking use of S3 registration ... OK
- checking dependencies in R code ... OK
- checking S3 generic/method consistency ... OK
- checking replacement functions ... OK
- checking foreign function calls ... OK
- checking R code for possible problems ... [11s] OK
- checking Rd files ... [1s] OK
- checking Rd metadata ... OK
- checking Rd cross-references ... OK
- checking for missing documentation entries ... OK
- checking for code/documentation mismatches ... OK
- checking Rd \usage sections ... OK
- checking Rd contents ... OK
- checking for unstated dependencies in examples ... OK
- checking examples ... [0s] ERROR
Running examples in 'bartCause-Ex.R' failed
The error most likely occurred in:
> ### Name: bartc
> ### Title: Causal Inference using Bayesian Additive Regression Trees
> ### Aliases: bartc
> ### Keywords: causal bart tmle
>
> ### ** Examples
>
> ## fit a simple linear model
> n <- 100L
> beta.z <- c(.75, -0.5, 0.25)
> beta.y <- c(.5, 1.0, -1.5)
> sigma <- 2
>
> set.seed(725)
> x <- matrix(rnorm(3 * n), n, 3)
> tau <- rgamma(1L, 0.25 * 16 * rgamma(1L, 1 * 32, 32), 16)
>
> p.score <- pnorm(x %*% beta.z)
> z <- rbinom(n, 1, p.score)
>
> mu.0 <- x %*% beta.y
> mu.1 <- x %*% beta.y + tau
>
> y <- mu.0 * (1 - z) + mu.1 * z + rnorm(n, 0, sigma)
>
> # low parameters only for example
> fit <- bartc(y, z, x, n.samples = 100L, n.burn = 15L, n.chains = 2L)
fitting treatment model via method 'bart'
Error in parse(text = deparse(RNGkind)[-1L]) :
<text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Calls: bartc ... validObject -> anyStrings -> isTRUE -> validityMethod -> parse
Execution halted
- checking for unstated dependencies in 'tests' ... OK
- checking tests ... [8s] ERROR
Running 'testthat.R' [8s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
> if (require(testthat, quietly = TRUE)) {
+ require(bartCause)
+ test_check("bartCause")
+ } else {
+ cat("package 'testthat' not available; cannot run unit tests\n")
+ }
Loading required package: bartCause
Saving _problems/test-02-treatmentFit-28.R
Saving _problems/test-02-treatmentFit-35.R
Saving _problems/test-02-treatmentFit-42.R
Saving _problems/test-02-treatmentFit-51.R
Saving _problems/test-03-responseFit-9.R
Saving _problems/test-03-responseFit-30.R
Saving _problems/test-03-responseFit-65.R
Saving _problems/test-04-bartc-22.R
Saving _problems/test-04-bartc-45.R
Saving _problems/test-04-bartc-66.R
Saving _problems/test-04-bartc-86.R
Saving _problems/test-04-bartc-95.R
Saving _problems/test-04-bartc-104.R
Saving _problems/test-04-bartc-132.R
Saving _problems/test-04-bartc-163.R
Saving _problems/test-04-bartc-204.R
Saving _problems/test-04-bartc-215.R
Saving _problems/test-04-bartc-231.R
Saving _problems/test-05-generics-8.R
Saving _problems/test-06-regression-9.R
Saving _problems/test-06-regression-17.R
Saving _problems/test-06-regression-25.R
Saving _problems/test-07-commonSupport-10.R
Saving _problems/test-07-commonSupport-34.R
Saving _problems/test-08-predict-19.R
Saving _problems/test-08-predict-41.R
Saving _problems/test-08-predict-73.R
Saving _problems/test-08-predict-99.R
Saving _problems/test-08-predict-121.R
Saving _problems/test-09-binary-8.R
Saving _problems/test-10-rng-9.R
Saving _problems/test-11-stan4bart-88.R
Saving _problems/test-11-stan4bart-103.R
[ FAIL 33 | WARN 0 | SKIP 7 | PASS 214 ]
══ Skipped tests (7) ═══════════════════════════════════════════════════════════
• On CRAN (7): 'test-04-bartc.R:111:3', 'test-04-bartc.R:139:3',
'test-04-bartc.R:185:3', 'test-04-bartc.R:236:3',
'test-06-regression.R:34:3', 'test-11-stan4bart.R:14:3',
'test-11-stan4bart.R:119:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-02-treatmentFit.R:28:3'): bart fit matches manual call ─────────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...) at test-02-treatmentFit.R:28:3
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::bart2(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-02-treatmentFit.R:35:3'): bart fit with fixef matches manual call ──
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...) at test-02-treatmentFit.R:35:3
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::bart2(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-02-treatmentFit.R:42:3'): rbart_vi fit matches manual call ─────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...) at test-02-treatmentFit.R:42:3
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::rbart_vi(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-02-treatmentFit.R:51:3'): bart fit adds extra defaults ─────────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...) at test-02-treatmentFit.R:51:3
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::bart2(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-03-responseFit.R:7:3'): bart fit matches manual call ───────────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartResponseFit(...) at test-03-responseFit.R:7:3
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::bart2(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-03-responseFit.R:30:3'): p.weight fits ─────────────────────────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause::bartc(...)
2. ├─bartCause:::assignAll(eval(responseCall, envir = evalEnv))
3. └─base::eval(responseCall, envir = evalEnv)
4. └─base::eval(responseCall, envir = evalEnv)
5. ├─bartCause:::getPWeightResponseFit(...)
6. │ ├─bartCause:::assignAll(eval(bartCall, envir = callingEnv))
7. │ └─base::eval(bartCall, envir = callingEnv)
8. │ └─base::eval(bartCall, envir = callingEnv)
9. └─bartCause:::getBartResponseFit(...)
10. └─base::eval(bartCall, envir = evalEnv)
11. └─base::eval(bartCall, envir = evalEnv)
12. ├─dbarts::bart2(...)
13. │ └─base::eval(controlCall, envir = callingEnv)
14. │ └─base::eval(controlCall, envir = callingEnv)
15. └─dbarts::dbartsControl(...)
16. └─methods::new(...)
17. ├─methods::initialize(value, ...)
18. └─dbarts (local) initialize(value, ...)
19. ├─methods::callNextMethod()
20. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
21. └─methods::validObject(.Object)
22. ├─methods (local) anyStrings(validityMethod(object))
23. │ └─base::isTRUE(x)
24. └─dbarts (local) validityMethod(object)
25. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-03-responseFit.R:64:3'): rbart_vi fit matches manual call ──────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartResponseFit(...) at test-03-responseFit.R:64:3
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::rbart_vi(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-04-bartc.R:20:3'): bartc matches manual fit ────────────────────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...)
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::bart2(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-04-bartc.R:44:3'): bartc returns valid ouput with one chain ────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause::bartc(...) at test-04-bartc.R:44:3
2. ├─bartCause:::assignAll(eval(responseCall, envir = evalEnv))
3. └─base::eval(responseCall, envir = evalEnv)
4. └─base::eval(responseCall, envir = evalEnv)
5. └─bartCause:::getBartResponseFit(...)
6. └─base::eval(bartCall, envir = evalEnv)
7. └─base::eval(bartCall, envir = evalEnv)
8. ├─dbarts::bart2(...)
9. │ └─base::eval(controlCall, envir = callingEnv)
10. │ └─base::eval(controlCall, envir = callingEnv)
11. └─dbarts::dbartsControl(...)
12. └─methods::new(...)
13. ├─methods::initialize(value, ...)
14. └─dbarts (local) initialize(value, ...)
15. ├─methods::callNextMethod()
16. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
17. └─methods::validObject(.Object)
18. ├─methods (local) anyStrings(validityMethod(object))
19. │ └─base::isTRUE(x)
20. └─dbarts (local) validityMethod(object)
21. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-04-bartc.R:65:3'): bartc returns valid ouput with two chains ───
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause::bartc(...) at test-04-bartc.R:65:3
2. ├─bartCause:::assignAll(eval(responseCall, envir = evalEnv))
3. └─base::eval(responseCall, envir = evalEnv)
4. └─base::eval(responseCall, envir = evalEnv)
5. └─bartCause:::getBartResponseFit(...)
6. └─base::eval(bartCall, envir = evalEnv)
7. └─base::eval(bartCall, envir = evalEnv)
8. ├─dbarts::bart2(...)
9. │ └─base::eval(controlCall, envir = callingEnv)
10. │ └─base::eval(controlCall, envir = callingEnv)
11. └─dbarts::dbartsControl(...)
12. └─methods::new(...)
13. ├─methods::initialize(value, ...)
14. └─dbarts (local) initialize(value, ...)
15. ├─methods::callNextMethod()
16. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
17. └─methods::validObject(.Object)
18. ├─methods (local) anyStrings(validityMethod(object))
19. │ └─base::isTRUE(x)
20. └─dbarts (local) validityMethod(object)
21. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-04-bartc.R:84:3'): bartc runs with all treatment settings and one chain ──
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. ├─testthat::expect_is(...) at test-04-bartc.R:84:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─bartCause::bartc(...)
5. ├─bartCause:::assignAll(eval(responseCall, envir = evalEnv))
6. └─base::eval(responseCall, envir = evalEnv)
7. └─base::eval(responseCall, envir = evalEnv)
8. └─bartCause:::getBartResponseFit(...)
9. └─base::eval(bartCall, envir = evalEnv)
10. └─base::eval(bartCall, envir = evalEnv)
11. ├─dbarts::bart2(...)
12. │ └─base::eval(controlCall, envir = callingEnv)
13. │ └─base::eval(controlCall, envir = callingEnv)
14. └─dbarts::dbartsControl(...)
15. └─methods::new(...)
16. ├─methods::initialize(value, ...)
17. └─dbarts (local) initialize(value, ...)
18. ├─methods::callNextMethod()
19. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
20. └─methods::validObject(.Object)
21. ├─methods (local) anyStrings(validityMethod(object))
22. │ └─base::isTRUE(x)
23. └─dbarts (local) validityMethod(object)
24. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-04-bartc.R:93:3'): bartc runs with all treatment settings and two chains ──
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. ├─testthat::expect_is(...) at test-04-bartc.R:93:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─bartCause::bartc(...)
5. ├─bartCause:::assignAll(eval(responseCall, envir = evalEnv))
6. └─base::eval(responseCall, envir = evalEnv)
7. └─base::eval(responseCall, envir = evalEnv)
8. └─bartCause:::getBartResponseFit(...)
9. └─base::eval(bartCall, envir = evalEnv)
10. └─base::eval(bartCall, envir = evalEnv)
11. ├─dbarts::bart2(...)
12. │ └─base::eval(controlCall, envir = callingEnv)
13. │ └─base::eval(controlCall, envir = callingEnv)
14. └─dbarts::dbartsControl(...)
15. └─methods::new(...)
16. ├─methods::initialize(value, ...)
17. └─dbarts (local) initialize(value, ...)
18. ├─methods::callNextMethod()
19. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
20. └─methods::validObject(.Object)
21. ├─methods (local) anyStrings(validityMethod(object))
22. │ └─base::isTRUE(x)
23. └─dbarts (local) validityMethod(object)
24. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-04-bartc.R:102:3'): bartc runs with all response settings and one chain ──
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...)
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::bart2(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-04-bartc.R:130:3'): bartc runs with all response settings and two chains ──
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...)
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::bart2(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-04-bartc.R:160:3'): bartc runs with all response settings and group.by set ──
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...)
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::rbart_vi(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-04-bartc.R:201:3'): bartc runs with missing data ───────────────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...)
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::rbart_vi(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-04-bartc.R:212:3'): bartc model argument overrides work correctly ──
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...)
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::bart2(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-04-bartc.R:229:3'): bartc works with '.' as confounders ────────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...)
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::bart2(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-05-generics.R:6:1'): (code run outside of `test_that()`) ───────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause::bartc(...) at test-05-generics.R:6:1
2. ├─bartCause:::assignAll(eval(responseCall, envir = evalEnv))
3. └─base::eval(responseCall, envir = evalEnv)
4. └─base::eval(responseCall, envir = evalEnv)
5. └─bartCause:::getBartResponseFit(...)
6. └─base::eval(bartCall, envir = evalEnv)
7. └─base::eval(bartCall, envir = evalEnv)
8. ├─dbarts::bart2(...)
9. │ └─base::eval(controlCall, envir = callingEnv)
10. │ └─base::eval(controlCall, envir = callingEnv)
11. └─dbarts::dbartsControl(...)
12. └─methods::new(...)
13. ├─methods::initialize(value, ...)
14. └─dbarts (local) initialize(value, ...)
15. ├─methods::callNextMethod()
16. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
17. └─methods::validObject(.Object)
18. ├─methods (local) anyStrings(validityMethod(object))
19. │ └─base::isTRUE(x)
20. └─dbarts (local) validityMethod(object)
21. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-06-regression.R:7:3'): naive bart matches old ──────────────────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartResponseFit(...)
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::bart2(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-06-regression.R:15:3'): bart on p.score matches old ────────────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...)
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::bart2(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-06-regression.R:23:3'): bart w/p.weighting matches old ─────────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...)
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::bart2(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-07-commonSupport.R:7:3'): sd common support diagnostic works ───
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...)
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::bart2(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-07-commonSupport.R:31:3'): chisq common support diagnostic works ──
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...)
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::bart2(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-08-predict.R:16:3'): predict gives sane results ────────────────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause::bartc(...) at test-08-predict.R:16:3
2. ├─bartCause:::assignAll(eval(responseCall, envir = evalEnv))
3. └─base::eval(responseCall, envir = evalEnv)
4. └─base::eval(responseCall, envir = evalEnv)
5. └─bartCause:::getBartResponseFit(...)
6. └─base::eval(bartCall, envir = evalEnv)
7. └─base::eval(bartCall, envir = evalEnv)
8. ├─dbarts::bart2(...)
9. │ └─base::eval(controlCall, envir = callingEnv)
10. │ └─base::eval(controlCall, envir = callingEnv)
11. └─dbarts::dbartsControl(...)
12. └─methods::new(...)
13. ├─methods::initialize(value, ...)
14. └─dbarts (local) initialize(value, ...)
15. ├─methods::callNextMethod()
16. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
17. └─methods::validObject(.Object)
18. ├─methods (local) anyStrings(validityMethod(object))
19. │ └─base::isTRUE(x)
20. └─dbarts (local) validityMethod(object)
21. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-08-predict.R:38:3'): predict results matches training data ─────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...)
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::bart2(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-08-predict.R:70:3'): predict works with grouped data, glm trt model ──
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause::bartc(...) at test-08-predict.R:70:3
2. ├─bartCause:::assignAll(eval(responseCall, envir = evalEnv))
3. └─base::eval(responseCall, envir = evalEnv)
4. └─base::eval(responseCall, envir = evalEnv)
5. └─bartCause:::getBartResponseFit(...)
6. └─base::eval(bartCall, envir = evalEnv)
7. └─base::eval(bartCall, envir = evalEnv)
8. ├─dbarts::bart2(...)
9. │ └─base::eval(controlCall, envir = callingEnv)
10. │ └─base::eval(controlCall, envir = callingEnv)
11. └─dbarts::dbartsControl(...)
12. └─methods::new(...)
13. ├─methods::initialize(value, ...)
14. └─dbarts (local) initialize(value, ...)
15. ├─methods::callNextMethod()
16. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
17. └─methods::validObject(.Object)
18. ├─methods (local) anyStrings(validityMethod(object))
19. │ └─base::isTRUE(x)
20. └─dbarts (local) validityMethod(object)
21. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-08-predict.R:94:3'): predict works with grouped data, glmer trt model ──
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. ├─base::suppressWarnings(...) at test-08-predict.R:94:3
2. │ └─base::withCallingHandlers(...)
3. └─bartCause::bartc(...)
4. ├─bartCause:::assignAll(eval(responseCall, envir = evalEnv))
5. └─base::eval(responseCall, envir = evalEnv)
6. └─base::eval(responseCall, envir = evalEnv)
7. └─bartCause:::getBartResponseFit(...)
8. └─base::eval(bartCall, envir = evalEnv)
9. └─base::eval(bartCall, envir = evalEnv)
10. ├─dbarts::bart2(...)
11. │ └─base::eval(controlCall, envir = callingEnv)
12. │ └─base::eval(controlCall, envir = callingEnv)
13. └─dbarts::dbartsControl(...)
14. └─methods::new(...)
15. ├─methods::initialize(value, ...)
16. └─dbarts (local) initialize(value, ...)
17. ├─methods::callNextMethod()
18. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
19. └─methods::validObject(.Object)
20. ├─methods (local) anyStrings(validityMethod(object))
21. │ └─base::isTRUE(x)
22. └─dbarts (local) validityMethod(object)
23. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-08-predict.R:118:3'): predict works with grouped data, bart trt model ──
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...)
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::rbart_vi(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-09-binary.R:6:1'): (code run outside of `test_that()`) ─────────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...)
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::bart2(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-10-rng.R:6:3'): bartc with fixed seed is reproducible ──────────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause:::getBartTreatmentFit(...)
2. └─base::eval(bartCall, envir = evalEnv)
3. └─base::eval(bartCall, envir = evalEnv)
4. ├─dbarts::bart2(...)
5. │ └─base::eval(controlCall, envir = callingEnv)
6. │ └─base::eval(controlCall, envir = callingEnv)
7. └─dbarts::dbartsControl(...)
8. └─methods::new(...)
9. ├─methods::initialize(value, ...)
10. └─dbarts (local) initialize(value, ...)
11. ├─methods::callNextMethod()
12. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
13. └─methods::validObject(.Object)
14. ├─methods (local) anyStrings(validityMethod(object))
15. │ └─base::isTRUE(x)
16. └─dbarts (local) validityMethod(object)
17. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-11-stan4bart.R:82:3'): semiparametric model does not have constant treatment effect ──
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─bartCause::bartc(...) at test-11-stan4bart.R:82:3
2. ├─bartCause:::assignAll(eval(responseCall, envir = evalEnv))
3. └─base::eval(responseCall, envir = evalEnv)
4. └─base::eval(responseCall, envir = evalEnv)
5. ├─bartCause:::getBartResponseFit(...)
6. │ └─base::eval(stan4bartCall, envir = callingEnv)
7. │ └─base::eval(stan4bartCall, envir = callingEnv)
8. └─bartCause:::getStan4BartResponseFit(...)
9. └─base::eval(stan4bartCall, envir = evalEnv)
10. └─base::eval(stan4bartCall, envir = evalEnv)
11. └─stan4bart::stan4bart(...)
12. └─stan4bart:::stan4bart_fit(...)
13. ├─base::eval(control_call)
14. │ └─base::eval(control_call)
15. └─dbarts::dbartsControl(...)
16. └─methods::new(...)
17. ├─methods::initialize(value, ...)
18. └─dbarts (local) initialize(value, ...)
19. ├─methods::callNextMethod()
20. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
21. └─methods::validObject(.Object)
22. ├─methods (local) anyStrings(validityMethod(object))
23. │ └─base::isTRUE(x)
24. └─dbarts (local) validityMethod(object)
25. └─base::parse(text = deparse(RNGkind)[-1L])
── Error ('test-11-stan4bart.R:97:3'): semiparametric predict works ────────────
Error in `parse(text = deparse(RNGkind)[-1L])`: <text>:1:22: unexpected ')'
1: binom.kind = NULL)
^
Backtrace:
▆
1. └─stan4bart::stan4bart(...)
2. └─stan4bart:::stan4bart_fit(...)
3. ├─base::eval(control_call)
4. │ └─base::eval(control_call)
5. └─dbarts::dbartsControl(...)
6. └─methods::new(...)
7. ├─methods::initialize(value, ...)
8. └─dbarts (local) initialize(value, ...)
9. ├─methods::callNextMethod()
10. └─methods (local) .nextMethod(.Object = .Object, ... = ...)
11. └─methods::validObject(.Object)
12. ├─methods (local) anyStrings(validityMethod(object))
13. │ └─base::isTRUE(x)
14. └─dbarts (local) validityMethod(object)
15. └─base::parse(text = deparse(RNGkind)[-1L])
[ FAIL 33 | WARN 0 | SKIP 7 | PASS 214 ]
Error:
! Test failures.
Execution halted
- checking PDF version of manual ... [19s] OK
- checking HTML version of manual ... [2s] OK
- DONE
Status: 2 ERRORs