CRAN Package Check Results for Package jstable

Last updated on 2026-07-08 12:58:01 CEST.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 1.3.25 20.60 247.30 267.90 ERROR
r-devel-linux-x86_64-debian-gcc 1.3.25 13.42 168.45 181.87 ERROR
r-devel-linux-x86_64-fedora-clang 1.3.25 38.00 299.23 337.23 ERROR
r-devel-linux-x86_64-fedora-gcc 1.3.25 35.00 259.38 294.38 ERROR
r-devel-windows-x86_64 1.3.25 22.00 268.00 290.00 OK
r-patched-linux-x86_64 1.3.25 20.95 242.81 263.76 OK
r-release-linux-x86_64 1.3.25 21.32 246.43 267.75 OK
r-release-macos-arm64 1.3.25 5.00 56.00 61.00 OK
r-release-macos-x86_64 1.3.25 14.00 261.00 275.00 OK
r-release-windows-x86_64 1.3.25 22.00 275.00 297.00 OK
r-oldrel-macos-arm64 1.3.25 5.00 58.00 63.00 OK
r-oldrel-macos-x86_64 1.3.25 15.00 176.00 191.00 OK
r-oldrel-windows-x86_64 1.3.25 32.00 338.00 370.00 OK

Check Details

Version: 1.3.25
Check: tests
Result: ERROR Running ‘testthat.R’ [50s/60s] Running the tests in ‘tests/testthat.R’ failed. Complete output: > library(testthat) > library(jstable) > > test_check("jstable") Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Saving _problems/test-regtable-129.R [ FAIL 1 | WARN 21 | SKIP 0 | PASS 131 ] ══ Failed tests ════════════════════════════════════════════════════════════════ ── Error ('test-regtable.R:129:3'): Run lmer.display ─────────────────────────── <Rcpp::exception/C++Error/error/condition> Error: Downdated VtV is not positive definite Backtrace: ▆ 1. ├─testthat::expect_is(...) at test-regtable.R:129:3 2. │ └─testthat::quasi_label(enquo(object), label) 3. │ └─rlang::eval_bare(expr, quo_get_env(quo)) 4. ├─jstable::lmer.display(...) 5. │ └─base::summary(lmerMod.obj) 6. └─lme4::glmer(...) 7. └─lme4::optimizeGlmer(...) 8. └─lme4:::optwrap(...) 9. ├─base::withCallingHandlers(...) 10. ├─base::do.call(optfun, arglist) 11. └─lme4 (local) `<fn>`(...) 12. ├─nM$newf(fn(nM$xeval())) 13. │ └─base::stopifnot(length(value <- as.numeric(value)) == 1L) 14. └─lme4 (local) fn(nM$xeval()) 15. └─lme4 (local) pwrssUpdate(...) [ FAIL 1 | WARN 21 | SKIP 0 | PASS 131 ] Error: ! Test failures. Execution halted Flavor: r-devel-linux-x86_64-debian-clang

Version: 1.3.25
Check: tests
Result: ERROR Running ‘testthat.R’ [34s/39s] Running the tests in ‘tests/testthat.R’ failed. Complete output: > library(testthat) > library(jstable) > > test_check("jstable") Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Saving _problems/test-regtable-129.R [ FAIL 1 | WARN 33 | SKIP 0 | PASS 131 ] ══ Failed tests ════════════════════════════════════════════════════════════════ ── Error ('test-regtable.R:129:3'): Run lmer.display ─────────────────────────── <Rcpp::exception/C++Error/error/condition> Error: Downdated VtV is not positive definite Backtrace: ▆ 1. ├─testthat::expect_is(...) at test-regtable.R:129:3 2. │ └─testthat::quasi_label(enquo(object), label) 3. │ └─rlang::eval_bare(expr, quo_get_env(quo)) 4. ├─jstable::lmer.display(...) 5. │ └─base::summary(lmerMod.obj) 6. └─lme4::glmer(...) 7. └─lme4::optimizeGlmer(...) 8. └─lme4:::optwrap(...) 9. ├─base::withCallingHandlers(...) 10. ├─base::do.call(optfun, arglist) 11. └─lme4 (local) `<fn>`(...) 12. ├─nM$newf(fn(nM$xeval())) 13. │ └─base::stopifnot(length(value <- as.numeric(value)) == 1L) 14. └─lme4 (local) fn(nM$xeval()) 15. └─lme4 (local) pwrssUpdate(...) [ FAIL 1 | WARN 33 | SKIP 0 | PASS 131 ] Error: ! Test failures. Execution halted Flavor: r-devel-linux-x86_64-debian-gcc

Version: 1.3.25
Check: tests
Result: ERROR Running ‘testthat.R’ [51s/52s] Running the tests in ‘tests/testthat.R’ failed. Complete output: > library(testthat) > library(jstable) > > test_check("jstable") Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Saving _problems/test-regtable-129.R [ FAIL 1 | WARN 21 | SKIP 0 | PASS 131 ] ══ Failed tests ════════════════════════════════════════════════════════════════ ── Error ('test-regtable.R:129:3'): Run lmer.display ─────────────────────────── <Rcpp::exception/C++Error/error/condition> Error: Downdated VtV is not positive definite Backtrace: ▆ 1. ├─testthat::expect_is(...) at test-regtable.R:129:3 2. │ └─testthat::quasi_label(enquo(object), label) 3. │ └─rlang::eval_bare(expr, quo_get_env(quo)) 4. ├─jstable::lmer.display(...) 5. │ └─base::summary(lmerMod.obj) 6. └─lme4::glmer(...) 7. └─lme4::optimizeGlmer(...) 8. └─lme4:::optwrap(...) 9. ├─base::withCallingHandlers(...) 10. ├─base::do.call(optfun, arglist) 11. └─lme4 (local) `<fn>`(...) 12. ├─nM$newf(fn(nM$xeval())) 13. │ └─base::stopifnot(length(value <- as.numeric(value)) == 1L) 14. └─lme4 (local) fn(nM$xeval()) 15. └─lme4 (local) pwrssUpdate(...) [ FAIL 1 | WARN 21 | SKIP 0 | PASS 131 ] Error: ! Test failures. Execution halted Flavor: r-devel-linux-x86_64-fedora-clang

Version: 1.3.25
Check: tests
Result: ERROR Running ‘testthat.R’ [49s/49s] Running the tests in ‘tests/testthat.R’ failed. Complete output: > library(testthat) > library(jstable) > > test_check("jstable") Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) svydesign(id = ~1, data = lung) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Independent Sampling design (with replacement) subset(data, get(var_subgroup) == .) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Stratified Independent Sampling design (with replacement) dpbc <- survey::svydesign(id = ~1, prob = ~randprob, strata = ~edema, data = subset(pbc, randomized)) Saving _problems/test-regtable-129.R [ FAIL 1 | WARN 21 | SKIP 0 | PASS 131 ] ══ Failed tests ════════════════════════════════════════════════════════════════ ── Error ('test-regtable.R:129:3'): Run lmer.display ─────────────────────────── <Rcpp::exception/C++Error/error/condition> Error: Downdated VtV is not positive definite Backtrace: ▆ 1. ├─testthat::expect_is(...) at test-regtable.R:129:3 2. │ └─testthat::quasi_label(enquo(object), label) 3. │ └─rlang::eval_bare(expr, quo_get_env(quo)) 4. ├─jstable::lmer.display(...) 5. │ └─base::summary(lmerMod.obj) 6. └─lme4::glmer(...) 7. └─lme4::optimizeGlmer(...) 8. └─lme4:::optwrap(...) 9. ├─base::withCallingHandlers(...) 10. ├─base::do.call(optfun, arglist) 11. └─lme4 (local) `<fn>`(...) 12. ├─nM$newf(fn(nM$xeval())) 13. │ └─base::stopifnot(length(value <- as.numeric(value)) == 1L) 14. └─lme4 (local) fn(nM$xeval()) 15. └─lme4 (local) pwrssUpdate(...) [ FAIL 1 | WARN 21 | SKIP 0 | PASS 131 ] Error: ! Test failures. Execution halted Flavor: r-devel-linux-x86_64-fedora-gcc