Last updated on 2026-10-27 05:58:11 CET.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 0.1.10 | 6.48 | 98.85 | 105.33 | ERROR | |
| r-devel-linux-x86_64-debian-gcc | 0.1.10 | 4.11 | 62.71 | 66.82 | ERROR | |
| r-devel-linux-x86_64-fedora-clang | 0.1.10 | 60.94 | ERROR | |||
| r-devel-linux-x86_64-fedora-gcc | 0.1.10 | 60.71 | ERROR | |||
| r-devel-windows-x86_64 | 0.1.10 | 11.00 | 109.00 | 120.00 | ERROR | |
| r-patched-linux-x86_64 | 0.1.10 | 6.30 | 97.09 | 103.39 | ERROR | |
| r-release-linux-x86_64 | 0.1.10 | 4.97 | 95.17 | 100.14 | ERROR | |
| r-release-macos-arm64 | 0.1.10 | 3.00 | 24.00 | 27.00 | OK | |
| r-release-macos-x86_64 | 0.1.10 | 7.00 | 105.00 | 112.00 | OK | |
| r-release-windows-x86_64 | 0.1.10 | 11.00 | 108.00 | 119.00 | ERROR | |
| r-oldrel-macos-arm64 | 0.1.10 | OK | ||||
| r-oldrel-macos-x86_64 | 0.1.10 | 7.00 | 104.00 | 111.00 | OK | |
| r-oldrel-windows-x86_64 | 0.1.10 | 15.00 | 139.00 | 154.00 | ERROR |
Version: 0.1.10
Check: tests
Result: ERROR
Running ‘testthat.R’ [16s/20s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(DesignLibrary)
Loading required package: DeclareDesign
Loading required package: randomizr
Loading required package: fabricatr
Loading required package: estimatr
>
> test_check(package = "DesignLibrary")
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
Saving _problems/test_designers-37.R
Saving _problems/test_designers-128.R
Saving _problems/test_designers-37.R
Saving _problems/test_designers-128.R
Saving _problems/test_designers-37.R
Saving _problems/test_designers-128.R
Saving _problems/test_diagnose_designers-6.R
[ FAIL 7 | WARN 16 | SKIP 0 | PASS 319 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_designers.R:37:7'): factorial_designer's default design runs. ──
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 256`: N is supplied by name.
Backtrace:
▆
1. ├─testthat::expect_is(...) at test_designers.R:37:7
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─DeclareDesign::diagnose_design(one_design, sims = 10, bootstrap_sims = FALSE)
5. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
6. └─base::mapply(...)
7. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
8. ├─base::withCallingHandlers(...)
9. ├─base::suppressWarnings(...)
10. │ └─base::withCallingHandlers(...)
11. └─DeclareDesign:::future_lapply(...)
12. └─base::lapply(...)
13. └─DeclareDesign (local) FUN(X[[i]], ...)
14. ├─DeclareDesign:::run_design_internal(design)
15. └─DeclareDesign:::run_design_internal.design(design)
16. └─DeclareDesign:::next_step(step, current_df, i)
17. └─base::tryCatch(...)
18. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
19. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
20. └─value[[3L]](cond)
── Error ('test_designers.R:128:9'): No column names in estimator data.frame conflict with parameters in factorial_designer ──
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 256`: N is supplied by name.
Backtrace:
▆
1. └─DeclareDesign::draw_estimates(the_designer()) at test_designers.R:128:9
2. └─DeclareDesign:::apply_on_design_dots(...)
3. └─base::lapply(designs, FUN)
4. └─DeclareDesign (local) FUN(X[[i]], ...)
5. └─DeclareDesign:::get_function_internal(...)
6. └─DeclareDesign:::run_design_internal.design(...)
7. └─DeclareDesign:::next_step(step, current_df, i)
8. └─base::tryCatch(...)
9. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
10. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
11. └─value[[3L]](cond)
── Error ('test_designers.R:37:7'): multi_arm_designer's default design runs. ──
Error: Error in step 6 (estimator):
Error in rbind.data.frame(ate_Y_2_1 = difference_in_means(formula = Y ~ : invalid list argument: all variables should have the same length
Backtrace:
▆
1. ├─testthat::expect_is(...) at test_designers.R:37:7
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─DeclareDesign::diagnose_design(one_design, sims = 10, bootstrap_sims = FALSE)
5. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
6. └─base::mapply(...)
7. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
8. ├─base::withCallingHandlers(...)
9. ├─base::suppressWarnings(...)
10. │ └─base::withCallingHandlers(...)
11. └─DeclareDesign:::future_lapply(...)
12. └─base::lapply(...)
13. └─DeclareDesign (local) FUN(X[[i]], ...)
14. ├─DeclareDesign:::run_design_internal(design)
15. └─DeclareDesign:::run_design_internal.design(design)
16. └─DeclareDesign:::next_step(step, current_df, i)
17. └─base::tryCatch(...)
18. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
19. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
20. └─value[[3L]](cond)
── Error ('test_designers.R:128:9'): No column names in estimator data.frame conflict with parameters in multi_arm_designer ──
Error: Error in step 6 (estimator):
Error in rbind.data.frame(ate_Y_2_1 = difference_in_means(formula = Y ~ : invalid list argument: all variables should have the same length
Backtrace:
▆
1. └─DeclareDesign::draw_estimates(the_designer()) at test_designers.R:128:9
2. └─DeclareDesign:::apply_on_design_dots(...)
3. └─base::lapply(designs, FUN)
4. └─DeclareDesign (local) FUN(X[[i]], ...)
5. └─DeclareDesign:::get_function_internal(...)
6. └─DeclareDesign:::run_design_internal.design(...)
7. └─DeclareDesign:::next_step(step, current_df, i)
8. └─base::tryCatch(...)
9. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
10. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
11. └─value[[3L]](cond)
── Error ('test_designers.R:37:7'): two_by_two_designer's default design runs. ──
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 100`: N is supplied by name.
Backtrace:
▆
1. ├─testthat::expect_is(...) at test_designers.R:37:7
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─DeclareDesign::diagnose_design(one_design, sims = 10, bootstrap_sims = FALSE)
5. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
6. └─base::mapply(...)
7. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
8. ├─base::withCallingHandlers(...)
9. ├─base::suppressWarnings(...)
10. │ └─base::withCallingHandlers(...)
11. └─DeclareDesign:::future_lapply(...)
12. └─base::lapply(...)
13. └─DeclareDesign (local) FUN(X[[i]], ...)
14. ├─DeclareDesign:::run_design_internal(design)
15. └─DeclareDesign:::run_design_internal.design(design)
16. └─DeclareDesign:::next_step(step, current_df, i)
17. └─base::tryCatch(...)
18. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
19. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
20. └─value[[3L]](cond)
── Error ('test_designers.R:128:9'): No column names in estimator data.frame conflict with parameters in two_by_two_designer ──
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 100`: N is supplied by name.
Backtrace:
▆
1. └─DeclareDesign::draw_estimates(the_designer()) at test_designers.R:128:9
2. └─DeclareDesign:::apply_on_design_dots(...)
3. └─base::lapply(designs, FUN)
4. └─DeclareDesign (local) FUN(X[[i]], ...)
5. └─DeclareDesign:::get_function_internal(...)
6. └─DeclareDesign:::run_design_internal.design(...)
7. └─DeclareDesign:::next_step(step, current_df, i)
8. └─base::tryCatch(...)
9. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
10. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
11. └─value[[3L]](cond)
── Error ('test_diagnose_designers.R:6:3'): with and without term ──────────────
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 500`: N is supplied by name.
Backtrace:
▆
1. └─DeclareDesign::diagnose_design(...) at test_diagnose_designers.R:6:3
2. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
3. └─base::mapply(...)
4. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
5. ├─base::withCallingHandlers(...)
6. ├─base::suppressWarnings(...)
7. │ └─base::withCallingHandlers(...)
8. └─DeclareDesign:::future_lapply(...)
9. └─base::lapply(...)
10. └─DeclareDesign (local) FUN(X[[i]], ...)
11. ├─DeclareDesign:::run_design_internal(design)
12. └─DeclareDesign:::run_design_internal.design(design)
13. └─DeclareDesign:::next_step(step, current_df, i)
14. └─base::tryCatch(...)
15. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
16. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
17. └─value[[3L]](cond)
[ FAIL 7 | WARN 16 | SKIP 0 | PASS 319 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-debian-clang
Version: 0.1.10
Check: examples
Result: ERROR
Running examples in ‘DesignLibrary-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: binary_iv_designer
> ### Title: Create a binary instrumental variables design
> ### Aliases: binary_iv_designer simple_iv_designer
>
> ### ** Examples
>
> # Generate a simple iv design: iv identifies late not ate
> binary_iv_design_1 <- binary_iv_designer(N = 1000, b = c(.1, .2, .3, .4))
Warning: `declare_population()` is deprecated. Use `declare_model()` instead.
This warning is displayed once per session.
Error in `declare_potential_outcomes()`:
! `declare_potential_outcomes()` is not a step in DeclareDesign 2.0.
ℹ Put potential outcomes in the model, as a formula:
• declare_model(N = 100, potential_outcomes(Y ~ 0.2 * Z + U))
ℹ Named potential outcomes are ordinary model variables:
• declare_model(Y_Z_0 = U, Y_Z_1 = U + 0.2)
Backtrace:
▆
1. └─DesignLibrary::binary_iv_designer(...)
2. └─DeclareDesign::declare_potential_outcomes(Y ~ a[type] + b[type] * X + d[type] * Z + u_Y, assignment_variables = "X")
3. └─rlang::abort(...)
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 0.1.10
Check: tests
Result: ERROR
Running ‘testthat.R’ [2s/3s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(DesignLibrary)
Loading required package: DeclareDesign
Loading required package: randomizr
Loading required package: fabricatr
Loading required package: estimatr
>
> test_check(package = "DesignLibrary")
Saving _problems/test_designers-17.R
Saving _problems/test_diagnose_designers-4.R
Saving _problems/test_fanout-6.R
Saving _problems/test_simulate_designers-4.R
[ FAIL 4 | WARN 1 | SKIP 0 | PASS 19 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_designers.R:17:3'): (code run outside of `test_that()`) ────────
Error in `declare_potential_outcomes(Y ~ a[type] + b[type] * X + d[type] * Z + u_Y, assignment_variables = "X")`: `declare_potential_outcomes()` is not a step in DeclareDesign 2.0.
ℹ Put potential outcomes in the model, as a formula:
• declare_model(N = 100, potential_outcomes(Y ~ 0.2 * Z + U))
ℹ Named potential outcomes are ordinary model variables:
• declare_model(Y_Z_0 = U, Y_Z_1 = U + 0.2)
Backtrace:
▆
1. └─DesignLibrary (local) the_designer() at test_designers.R:17:3
2. └─DeclareDesign::declare_potential_outcomes(Y ~ a[type] + b[type] * X + d[type] * Z + u_Y, assignment_variables = "X")
3. └─rlang::abort(...)
── Error ('test_diagnose_designers.R:4:3'): with and without term ──────────────
Error in `declare_potential_outcomes(Y_A_0_B_0 = mean_A0B0 + u + rnorm(N, sd = outcome_sds[1]), Y_A_0_B_1 = mean_A0B1 + u + rnorm(N, sd = outcome_sds[2]), Y_A_1_B_0 = mean_A1B0 + u + rnorm(N, sd = outcome_sds[3]), Y_A_1_B_1 = mean_A1B1 + u + rnorm(N, sd = outcome_sds[4]))`: `declare_potential_outcomes()` is not a step in DeclareDesign 2.0.
ℹ Put potential outcomes in the model, as a formula:
• declare_model(N = 100, potential_outcomes(Y ~ 0.2 * Z + U))
ℹ Named potential outcomes are ordinary model variables:
• declare_model(Y_Z_0 = U, Y_Z_1 = U + 0.2)
Backtrace:
▆
1. └─DesignLibrary::two_by_two_designer(...) at test_diagnose_designers.R:4:3
2. └─DeclareDesign::declare_potential_outcomes(...)
3. └─rlang::abort(...)
── Error ('test_fanout.R:6:3'): fan out IDs are correct ────────────────────────
Error in `declare_potential_outcomes(Y ~ (1 - Z) * (u_0 * control_sd + control_mean) + Z * (u_1 * treatment_sd + treatment_mean))`: `declare_potential_outcomes()` is not a step in DeclareDesign 2.0.
ℹ Put potential outcomes in the model, as a formula:
• declare_model(N = 100, potential_outcomes(Y ~ 0.2 * Z + U))
ℹ Named potential outcomes are ordinary model variables:
• declare_model(Y_Z_0 = U, Y_Z_1 = U + 0.2)
Backtrace:
▆
1. └─DesignLibrary::two_arm_designer(rho = 0) at test_fanout.R:6:3
2. └─DeclareDesign::declare_potential_outcomes(...)
3. └─rlang::abort(...)
── Error ('test_simulate_designers.R:4:3'): MH sim ids ─────────────────────────
Error in `declare_potential_outcomes(Y ~ (1 - Z) * (u_0 * control_sd + control_mean) + Z * (u_1 * treatment_sd + treatment_mean))`: `declare_potential_outcomes()` is not a step in DeclareDesign 2.0.
ℹ Put potential outcomes in the model, as a formula:
• declare_model(N = 100, potential_outcomes(Y ~ 0.2 * Z + U))
ℹ Named potential outcomes are ordinary model variables:
• declare_model(Y_Z_0 = U, Y_Z_1 = U + 0.2)
Backtrace:
▆
1. └─DesignLibrary::two_arm_designer() at test_simulate_designers.R:4:3
2. └─DeclareDesign::declare_potential_outcomes(...)
3. └─rlang::abort(...)
[ FAIL 4 | WARN 1 | SKIP 0 | PASS 19 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 0.1.10
Check: examples
Result: ERROR
Running examples in ‘DesignLibrary-Ex.R’ failed
The error most likely occurred in:
> ### Name: binary_iv_designer
> ### Title: Create a binary instrumental variables design
> ### Aliases: binary_iv_designer simple_iv_designer
>
> ### ** Examples
>
> # Generate a simple iv design: iv identifies late not ate
> binary_iv_design_1 <- binary_iv_designer(N = 1000, b = c(.1, .2, .3, .4))
Warning: `declare_population()` is deprecated. Use `declare_model()` instead.
This warning is displayed once per session.
Error in `declare_potential_outcomes()`:
! `declare_potential_outcomes()` is not a step in DeclareDesign 2.0.
ℹ Put potential outcomes in the model, as a formula:
• declare_model(N = 100, potential_outcomes(Y ~ 0.2 * Z + U))
ℹ Named potential outcomes are ordinary model variables:
• declare_model(Y_Z_0 = U, Y_Z_1 = U + 0.2)
Backtrace:
▆
1. └─DesignLibrary::binary_iv_designer(...)
2. └─DeclareDesign::declare_potential_outcomes(Y ~ a[type] + b[type] * X + d[type] * Z + u_Y, assignment_variables = "X")
3. └─rlang::abort(...)
Execution halted
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc
Version: 0.1.10
Check: tests
Result: ERROR
Running ‘testthat.R’
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(DesignLibrary)
Loading required package: DeclareDesign
Loading required package: randomizr
Loading required package: fabricatr
Loading required package: estimatr
>
> test_check(package = "DesignLibrary")
Saving _problems/test_designers-17.R
Saving _problems/test_diagnose_designers-4.R
Saving _problems/test_fanout-6.R
Saving _problems/test_simulate_designers-4.R
[ FAIL 4 | WARN 1 | SKIP 0 | PASS 19 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_designers.R:17:3'): (code run outside of `test_that()`) ────────
Error in `declare_potential_outcomes(Y ~ a[type] + b[type] * X + d[type] * Z + u_Y, assignment_variables = "X")`: `declare_potential_outcomes()` is not a step in DeclareDesign 2.0.
ℹ Put potential outcomes in the model, as a formula:
• declare_model(N = 100, potential_outcomes(Y ~ 0.2 * Z + U))
ℹ Named potential outcomes are ordinary model variables:
• declare_model(Y_Z_0 = U, Y_Z_1 = U + 0.2)
Backtrace:
▆
1. └─DesignLibrary (local) the_designer() at test_designers.R:17:3
2. └─DeclareDesign::declare_potential_outcomes(Y ~ a[type] + b[type] * X + d[type] * Z + u_Y, assignment_variables = "X")
3. └─rlang::abort(...)
── Error ('test_diagnose_designers.R:4:3'): with and without term ──────────────
Error in `declare_potential_outcomes(Y_A_0_B_0 = mean_A0B0 + u + rnorm(N, sd = outcome_sds[1]), Y_A_0_B_1 = mean_A0B1 + u + rnorm(N, sd = outcome_sds[2]), Y_A_1_B_0 = mean_A1B0 + u + rnorm(N, sd = outcome_sds[3]), Y_A_1_B_1 = mean_A1B1 + u + rnorm(N, sd = outcome_sds[4]))`: `declare_potential_outcomes()` is not a step in DeclareDesign 2.0.
ℹ Put potential outcomes in the model, as a formula:
• declare_model(N = 100, potential_outcomes(Y ~ 0.2 * Z + U))
ℹ Named potential outcomes are ordinary model variables:
• declare_model(Y_Z_0 = U, Y_Z_1 = U + 0.2)
Backtrace:
▆
1. └─DesignLibrary::two_by_two_designer(...) at test_diagnose_designers.R:4:3
2. └─DeclareDesign::declare_potential_outcomes(...)
3. └─rlang::abort(...)
── Error ('test_fanout.R:6:3'): fan out IDs are correct ────────────────────────
Error in `declare_potential_outcomes(Y ~ (1 - Z) * (u_0 * control_sd + control_mean) + Z * (u_1 * treatment_sd + treatment_mean))`: `declare_potential_outcomes()` is not a step in DeclareDesign 2.0.
ℹ Put potential outcomes in the model, as a formula:
• declare_model(N = 100, potential_outcomes(Y ~ 0.2 * Z + U))
ℹ Named potential outcomes are ordinary model variables:
• declare_model(Y_Z_0 = U, Y_Z_1 = U + 0.2)
Backtrace:
▆
1. └─DesignLibrary::two_arm_designer(rho = 0) at test_fanout.R:6:3
2. └─DeclareDesign::declare_potential_outcomes(...)
3. └─rlang::abort(...)
── Error ('test_simulate_designers.R:4:3'): MH sim ids ─────────────────────────
Error in `declare_potential_outcomes(Y ~ (1 - Z) * (u_0 * control_sd + control_mean) + Z * (u_1 * treatment_sd + treatment_mean))`: `declare_potential_outcomes()` is not a step in DeclareDesign 2.0.
ℹ Put potential outcomes in the model, as a formula:
• declare_model(N = 100, potential_outcomes(Y ~ 0.2 * Z + U))
ℹ Named potential outcomes are ordinary model variables:
• declare_model(Y_Z_0 = U, Y_Z_1 = U + 0.2)
Backtrace:
▆
1. └─DesignLibrary::two_arm_designer() at test_simulate_designers.R:4:3
2. └─DeclareDesign::declare_potential_outcomes(...)
3. └─rlang::abort(...)
[ FAIL 4 | WARN 1 | SKIP 0 | PASS 19 ]
Error:
! Test failures.
Execution halted
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc
Version: 0.1.10
Check: tests
Result: ERROR
Running 'testthat.R' [15s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
> library(testthat)
> library(DesignLibrary)
Loading required package: DeclareDesign
Loading required package: randomizr
Loading required package: fabricatr
Loading required package: estimatr
>
> test_check(package = "DesignLibrary")
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
Saving _problems/test_designers-37.R
Saving _problems/test_designers-128.R
Saving _problems/test_designers-37.R
Saving _problems/test_designers-128.R
Saving _problems/test_designers-37.R
Saving _problems/test_designers-128.R
Saving _problems/test_diagnose_designers-6.R
[ FAIL 7 | WARN 16 | SKIP 0 | PASS 319 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_designers.R:37:7'): factorial_designer's default design runs. ──
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 256`: N is supplied by name.
Backtrace:
▆
1. ├─testthat::expect_is(...) at test_designers.R:37:7
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─DeclareDesign::diagnose_design(one_design, sims = 10, bootstrap_sims = FALSE)
5. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
6. └─base::mapply(...)
7. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
8. ├─base::withCallingHandlers(...)
9. ├─base::suppressWarnings(...)
10. │ └─base::withCallingHandlers(...)
11. └─DeclareDesign:::future_lapply(...)
12. └─base::lapply(...)
13. └─DeclareDesign (local) FUN(X[[i]], ...)
14. ├─DeclareDesign:::run_design_internal(design)
15. └─DeclareDesign:::run_design_internal.design(design)
16. └─DeclareDesign:::next_step(step, current_df, i)
17. └─base::tryCatch(...)
18. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
19. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
20. └─value[[3L]](cond)
── Error ('test_designers.R:128:9'): No column names in estimator data.frame conflict with parameters in factorial_designer ──
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 256`: N is supplied by name.
Backtrace:
▆
1. └─DeclareDesign::draw_estimates(the_designer()) at test_designers.R:128:9
2. └─DeclareDesign:::apply_on_design_dots(...)
3. └─base::lapply(designs, FUN)
4. └─DeclareDesign (local) FUN(X[[i]], ...)
5. └─DeclareDesign:::get_function_internal(...)
6. └─DeclareDesign:::run_design_internal.design(...)
7. └─DeclareDesign:::next_step(step, current_df, i)
8. └─base::tryCatch(...)
9. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
10. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
11. └─value[[3L]](cond)
── Error ('test_designers.R:37:7'): multi_arm_designer's default design runs. ──
Error: Error in step 6 (estimator):
Error in rbind.data.frame(ate_Y_2_1 = difference_in_means(formula = Y ~ : invalid list argument: all variables should have the same length
Backtrace:
▆
1. ├─testthat::expect_is(...) at test_designers.R:37:7
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─DeclareDesign::diagnose_design(one_design, sims = 10, bootstrap_sims = FALSE)
5. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
6. └─base::mapply(...)
7. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
8. ├─base::withCallingHandlers(...)
9. ├─base::suppressWarnings(...)
10. │ └─base::withCallingHandlers(...)
11. └─DeclareDesign:::future_lapply(...)
12. └─base::lapply(...)
13. └─DeclareDesign (local) FUN(X[[i]], ...)
14. ├─DeclareDesign:::run_design_internal(design)
15. └─DeclareDesign:::run_design_internal.design(design)
16. └─DeclareDesign:::next_step(step, current_df, i)
17. └─base::tryCatch(...)
18. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
19. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
20. └─value[[3L]](cond)
── Error ('test_designers.R:128:9'): No column names in estimator data.frame conflict with parameters in multi_arm_designer ──
Error: Error in step 6 (estimator):
Error in rbind.data.frame(ate_Y_2_1 = difference_in_means(formula = Y ~ : invalid list argument: all variables should have the same length
Backtrace:
▆
1. └─DeclareDesign::draw_estimates(the_designer()) at test_designers.R:128:9
2. └─DeclareDesign:::apply_on_design_dots(...)
3. └─base::lapply(designs, FUN)
4. └─DeclareDesign (local) FUN(X[[i]], ...)
5. └─DeclareDesign:::get_function_internal(...)
6. └─DeclareDesign:::run_design_internal.design(...)
7. └─DeclareDesign:::next_step(step, current_df, i)
8. └─base::tryCatch(...)
9. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
10. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
11. └─value[[3L]](cond)
── Error ('test_designers.R:37:7'): two_by_two_designer's default design runs. ──
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 100`: N is supplied by name.
Backtrace:
▆
1. ├─testthat::expect_is(...) at test_designers.R:37:7
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─DeclareDesign::diagnose_design(one_design, sims = 10, bootstrap_sims = FALSE)
5. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
6. └─base::mapply(...)
7. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
8. ├─base::withCallingHandlers(...)
9. ├─base::suppressWarnings(...)
10. │ └─base::withCallingHandlers(...)
11. └─DeclareDesign:::future_lapply(...)
12. └─base::lapply(...)
13. └─DeclareDesign (local) FUN(X[[i]], ...)
14. ├─DeclareDesign:::run_design_internal(design)
15. └─DeclareDesign:::run_design_internal.design(design)
16. └─DeclareDesign:::next_step(step, current_df, i)
17. └─base::tryCatch(...)
18. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
19. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
20. └─value[[3L]](cond)
── Error ('test_designers.R:128:9'): No column names in estimator data.frame conflict with parameters in two_by_two_designer ──
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 100`: N is supplied by name.
Backtrace:
▆
1. └─DeclareDesign::draw_estimates(the_designer()) at test_designers.R:128:9
2. └─DeclareDesign:::apply_on_design_dots(...)
3. └─base::lapply(designs, FUN)
4. └─DeclareDesign (local) FUN(X[[i]], ...)
5. └─DeclareDesign:::get_function_internal(...)
6. └─DeclareDesign:::run_design_internal.design(...)
7. └─DeclareDesign:::next_step(step, current_df, i)
8. └─base::tryCatch(...)
9. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
10. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
11. └─value[[3L]](cond)
── Error ('test_diagnose_designers.R:6:3'): with and without term ──────────────
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 500`: N is supplied by name.
Backtrace:
▆
1. └─DeclareDesign::diagnose_design(...) at test_diagnose_designers.R:6:3
2. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
3. └─base::mapply(...)
4. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
5. ├─base::withCallingHandlers(...)
6. ├─base::suppressWarnings(...)
7. │ └─base::withCallingHandlers(...)
8. └─DeclareDesign:::future_lapply(...)
9. └─base::lapply(...)
10. └─DeclareDesign (local) FUN(X[[i]], ...)
11. ├─DeclareDesign:::run_design_internal(design)
12. └─DeclareDesign:::run_design_internal.design(design)
13. └─DeclareDesign:::next_step(step, current_df, i)
14. └─base::tryCatch(...)
15. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
16. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
17. └─value[[3L]](cond)
[ FAIL 7 | WARN 16 | SKIP 0 | PASS 319 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-windows-x86_64
Version: 0.1.10
Check: tests
Result: ERROR
Running ‘testthat.R’ [17s/21s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(DesignLibrary)
Loading required package: DeclareDesign
Loading required package: randomizr
Loading required package: fabricatr
Loading required package: estimatr
>
> test_check(package = "DesignLibrary")
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
Saving _problems/test_designers-37.R
Saving _problems/test_designers-128.R
Saving _problems/test_diagnose_designers-6.R
[ FAIL 3 | WARN 18 | SKIP 0 | PASS 323 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_designers.R:37:7'): multi_arm_designer's default design runs. ──
Error: Error in step 6 (estimator):
Error in rbind.data.frame(ate_Y_2_1 = difference_in_means(formula = Y ~ : invalid list argument: all variables should have the same length
Backtrace:
▆
1. ├─testthat::expect_is(...) at test_designers.R:37:7
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─DeclareDesign::diagnose_design(one_design, sims = 10, bootstrap_sims = FALSE)
5. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
6. └─base::mapply(...)
7. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
8. ├─base::withCallingHandlers(...)
9. ├─base::suppressWarnings(...)
10. │ └─base::withCallingHandlers(...)
11. └─DeclareDesign:::future_lapply(...)
12. └─base::lapply(...)
13. └─DeclareDesign (local) FUN(X[[i]], ...)
14. ├─DeclareDesign:::run_design_internal(design)
15. └─DeclareDesign:::run_design_internal.design(design)
16. └─DeclareDesign:::next_step(step, current_df, i)
17. └─base::tryCatch(...)
18. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
19. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
20. └─value[[3L]](cond)
── Error ('test_designers.R:128:9'): No column names in estimator data.frame conflict with parameters in multi_arm_designer ──
Error: Error in step 6 (estimator):
Error in rbind.data.frame(ate_Y_2_1 = difference_in_means(formula = Y ~ : invalid list argument: all variables should have the same length
Backtrace:
▆
1. └─DeclareDesign::draw_estimates(the_designer()) at test_designers.R:128:9
2. └─DeclareDesign:::apply_on_design_dots(...)
3. └─base::lapply(designs, FUN)
4. └─DeclareDesign (local) FUN(X[[i]], ...)
5. └─DeclareDesign:::get_function_internal(...)
6. └─DeclareDesign:::run_design_internal.design(...)
7. └─DeclareDesign:::next_step(step, current_df, i)
8. └─base::tryCatch(...)
9. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
10. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
11. └─value[[3L]](cond)
── Error ('test_diagnose_designers.R:6:3'): with and without term ──────────────
Error: Error in step 6 (estimator):
Error in rbind.data.frame(ate_Y_2_1 = difference_in_means(formula = Y ~ : invalid list argument: all variables should have the same length
Backtrace:
▆
1. └─DeclareDesign::diagnose_design(...) at test_diagnose_designers.R:6:3
2. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
3. └─base::mapply(...)
4. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[2L]], sims = dots[[2L]][[2L]], future.seed = dots[[3L]][[1L]])
5. ├─base::withCallingHandlers(...)
6. ├─base::suppressWarnings(...)
7. │ └─base::withCallingHandlers(...)
8. └─DeclareDesign:::future_lapply(...)
9. └─base::lapply(...)
10. └─DeclareDesign (local) FUN(X[[i]], ...)
11. ├─DeclareDesign:::run_design_internal(design)
12. └─DeclareDesign:::run_design_internal.design(design)
13. └─DeclareDesign:::next_step(step, current_df, i)
14. └─base::tryCatch(...)
15. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
16. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
17. └─value[[3L]](cond)
[ FAIL 3 | WARN 18 | SKIP 0 | PASS 323 ]
Error:
! Test failures.
Execution halted
Flavor: r-patched-linux-x86_64
Version: 0.1.10
Check: tests
Result: ERROR
Running ‘testthat.R’ [16s/18s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(DesignLibrary)
Loading required package: DeclareDesign
Loading required package: randomizr
Loading required package: fabricatr
Loading required package: estimatr
>
> test_check(package = "DesignLibrary")
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
Saving _problems/test_designers-37.R
Saving _problems/test_designers-128.R
Saving _problems/test_designers-37.R
Saving _problems/test_designers-128.R
Saving _problems/test_designers-37.R
Saving _problems/test_designers-128.R
Saving _problems/test_diagnose_designers-6.R
[ FAIL 7 | WARN 16 | SKIP 0 | PASS 319 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_designers.R:37:7'): factorial_designer's default design runs. ──
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 256`: N is supplied by name.
Backtrace:
▆
1. ├─testthat::expect_is(...) at test_designers.R:37:7
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─DeclareDesign::diagnose_design(one_design, sims = 10, bootstrap_sims = FALSE)
5. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
6. └─base::mapply(...)
7. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
8. ├─base::withCallingHandlers(...)
9. ├─base::suppressWarnings(...)
10. │ └─base::withCallingHandlers(...)
11. └─DeclareDesign:::future_lapply(...)
12. └─base::lapply(...)
13. └─DeclareDesign (local) FUN(X[[i]], ...)
14. ├─DeclareDesign:::run_design_internal(design)
15. └─DeclareDesign:::run_design_internal.design(design)
16. └─DeclareDesign:::next_step(step, current_df, i)
17. └─base::tryCatch(...)
18. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
19. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
20. └─value[[3L]](cond)
── Error ('test_designers.R:128:9'): No column names in estimator data.frame conflict with parameters in factorial_designer ──
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 256`: N is supplied by name.
Backtrace:
▆
1. └─DeclareDesign::draw_estimates(the_designer()) at test_designers.R:128:9
2. └─DeclareDesign:::apply_on_design_dots(...)
3. └─base::lapply(designs, FUN)
4. └─DeclareDesign (local) FUN(X[[i]], ...)
5. └─DeclareDesign:::get_function_internal(...)
6. └─DeclareDesign:::run_design_internal.design(...)
7. └─DeclareDesign:::next_step(step, current_df, i)
8. └─base::tryCatch(...)
9. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
10. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
11. └─value[[3L]](cond)
── Error ('test_designers.R:37:7'): multi_arm_designer's default design runs. ──
Error: Error in step 6 (estimator):
Error in rbind.data.frame(ate_Y_2_1 = difference_in_means(formula = Y ~ : invalid list argument: all variables should have the same length
Backtrace:
▆
1. ├─testthat::expect_is(...) at test_designers.R:37:7
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─DeclareDesign::diagnose_design(one_design, sims = 10, bootstrap_sims = FALSE)
5. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
6. └─base::mapply(...)
7. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
8. ├─base::withCallingHandlers(...)
9. ├─base::suppressWarnings(...)
10. │ └─base::withCallingHandlers(...)
11. └─DeclareDesign:::future_lapply(...)
12. └─base::lapply(...)
13. └─DeclareDesign (local) FUN(X[[i]], ...)
14. ├─DeclareDesign:::run_design_internal(design)
15. └─DeclareDesign:::run_design_internal.design(design)
16. └─DeclareDesign:::next_step(step, current_df, i)
17. └─base::tryCatch(...)
18. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
19. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
20. └─value[[3L]](cond)
── Error ('test_designers.R:128:9'): No column names in estimator data.frame conflict with parameters in multi_arm_designer ──
Error: Error in step 6 (estimator):
Error in rbind.data.frame(ate_Y_2_1 = difference_in_means(formula = Y ~ : invalid list argument: all variables should have the same length
Backtrace:
▆
1. └─DeclareDesign::draw_estimates(the_designer()) at test_designers.R:128:9
2. └─DeclareDesign:::apply_on_design_dots(...)
3. └─base::lapply(designs, FUN)
4. └─DeclareDesign (local) FUN(X[[i]], ...)
5. └─DeclareDesign:::get_function_internal(...)
6. └─DeclareDesign:::run_design_internal.design(...)
7. └─DeclareDesign:::next_step(step, current_df, i)
8. └─base::tryCatch(...)
9. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
10. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
11. └─value[[3L]](cond)
── Error ('test_designers.R:37:7'): two_by_two_designer's default design runs. ──
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 100`: N is supplied by name.
Backtrace:
▆
1. ├─testthat::expect_is(...) at test_designers.R:37:7
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─DeclareDesign::diagnose_design(one_design, sims = 10, bootstrap_sims = FALSE)
5. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
6. └─base::mapply(...)
7. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
8. ├─base::withCallingHandlers(...)
9. ├─base::suppressWarnings(...)
10. │ └─base::withCallingHandlers(...)
11. └─DeclareDesign:::future_lapply(...)
12. └─base::lapply(...)
13. └─DeclareDesign (local) FUN(X[[i]], ...)
14. ├─DeclareDesign:::run_design_internal(design)
15. └─DeclareDesign:::run_design_internal.design(design)
16. └─DeclareDesign:::next_step(step, current_df, i)
17. └─base::tryCatch(...)
18. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
19. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
20. └─value[[3L]](cond)
── Error ('test_designers.R:128:9'): No column names in estimator data.frame conflict with parameters in two_by_two_designer ──
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 100`: N is supplied by name.
Backtrace:
▆
1. └─DeclareDesign::draw_estimates(the_designer()) at test_designers.R:128:9
2. └─DeclareDesign:::apply_on_design_dots(...)
3. └─base::lapply(designs, FUN)
4. └─DeclareDesign (local) FUN(X[[i]], ...)
5. └─DeclareDesign:::get_function_internal(...)
6. └─DeclareDesign:::run_design_internal.design(...)
7. └─DeclareDesign:::next_step(step, current_df, i)
8. └─base::tryCatch(...)
9. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
10. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
11. └─value[[3L]](cond)
── Error ('test_diagnose_designers.R:6:3'): with and without term ──────────────
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 500`: N is supplied by name.
Backtrace:
▆
1. └─DeclareDesign::diagnose_design(...) at test_diagnose_designers.R:6:3
2. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
3. └─base::mapply(...)
4. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
5. ├─base::withCallingHandlers(...)
6. ├─base::suppressWarnings(...)
7. │ └─base::withCallingHandlers(...)
8. └─DeclareDesign:::future_lapply(...)
9. └─base::lapply(...)
10. └─DeclareDesign (local) FUN(X[[i]], ...)
11. ├─DeclareDesign:::run_design_internal(design)
12. └─DeclareDesign:::run_design_internal.design(design)
13. └─DeclareDesign:::next_step(step, current_df, i)
14. └─base::tryCatch(...)
15. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
16. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
17. └─value[[3L]](cond)
[ FAIL 7 | WARN 16 | SKIP 0 | PASS 319 ]
Error:
! Test failures.
Execution halted
Flavor: r-release-linux-x86_64
Version: 0.1.10
Check: tests
Result: ERROR
Running 'testthat.R' [16s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
> library(testthat)
> library(DesignLibrary)
Loading required package: DeclareDesign
Loading required package: randomizr
Loading required package: fabricatr
Loading required package: estimatr
>
> test_check(package = "DesignLibrary")
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
Saving _problems/test_designers-37.R
Saving _problems/test_designers-128.R
Saving _problems/test_diagnose_designers-6.R
[ FAIL 3 | WARN 18 | SKIP 0 | PASS 323 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_designers.R:37:7'): multi_arm_designer's default design runs. ──
Error: Error in step 6 (estimator):
Error in rbind.data.frame(ate_Y_2_1 = difference_in_means(formula = Y ~ : invalid list argument: all variables should have the same length
Backtrace:
▆
1. ├─testthat::expect_is(...) at test_designers.R:37:7
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─DeclareDesign::diagnose_design(one_design, sims = 10, bootstrap_sims = FALSE)
5. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
6. └─base::mapply(...)
7. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
8. ├─base::withCallingHandlers(...)
9. ├─base::suppressWarnings(...)
10. │ └─base::withCallingHandlers(...)
11. └─DeclareDesign:::future_lapply(...)
12. └─base::lapply(...)
13. └─DeclareDesign (local) FUN(X[[i]], ...)
14. ├─DeclareDesign:::run_design_internal(design)
15. └─DeclareDesign:::run_design_internal.design(design)
16. └─DeclareDesign:::next_step(step, current_df, i)
17. └─base::tryCatch(...)
18. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
19. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
20. └─value[[3L]](cond)
── Error ('test_designers.R:128:9'): No column names in estimator data.frame conflict with parameters in multi_arm_designer ──
Error: Error in step 6 (estimator):
Error in rbind.data.frame(ate_Y_2_1 = difference_in_means(formula = Y ~ : invalid list argument: all variables should have the same length
Backtrace:
▆
1. └─DeclareDesign::draw_estimates(the_designer()) at test_designers.R:128:9
2. └─DeclareDesign:::apply_on_design_dots(...)
3. └─base::lapply(designs, FUN)
4. └─DeclareDesign (local) FUN(X[[i]], ...)
5. └─DeclareDesign:::get_function_internal(...)
6. └─DeclareDesign:::run_design_internal.design(...)
7. └─DeclareDesign:::next_step(step, current_df, i)
8. └─base::tryCatch(...)
9. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
10. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
11. └─value[[3L]](cond)
── Error ('test_diagnose_designers.R:6:3'): with and without term ──────────────
Error: Error in step 6 (estimator):
Error in rbind.data.frame(ate_Y_2_1 = difference_in_means(formula = Y ~ : invalid list argument: all variables should have the same length
Backtrace:
▆
1. └─DeclareDesign::diagnose_design(...) at test_diagnose_designers.R:6:3
2. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
3. └─base::mapply(...)
4. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[2L]], sims = dots[[2L]][[2L]], future.seed = dots[[3L]][[1L]])
5. ├─base::withCallingHandlers(...)
6. ├─base::suppressWarnings(...)
7. │ └─base::withCallingHandlers(...)
8. └─DeclareDesign:::future_lapply(...)
9. └─base::lapply(...)
10. └─DeclareDesign (local) FUN(X[[i]], ...)
11. ├─DeclareDesign:::run_design_internal(design)
12. └─DeclareDesign:::run_design_internal.design(design)
13. └─DeclareDesign:::next_step(step, current_df, i)
14. └─base::tryCatch(...)
15. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
16. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
17. └─value[[3L]](cond)
[ FAIL 3 | WARN 18 | SKIP 0 | PASS 323 ]
Error:
! Test failures.
Execution halted
Flavor: r-release-windows-x86_64
Version: 0.1.10
Check: tests
Result: ERROR
Running 'testthat.R' [20s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
> library(testthat)
> library(DesignLibrary)
Loading required package: DeclareDesign
Loading required package: randomizr
Loading required package: fabricatr
Loading required package: estimatr
>
> test_check(package = "DesignLibrary")
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
[1] "The implied ICC in (control) is 0.667"
[1] "The implied ICC in (control) conditional on block is 0.5"
Saving _problems/test_designers-37.R
Saving _problems/test_designers-128.R
Saving _problems/test_designers-37.R
Saving _problems/test_designers-128.R
Saving _problems/test_designers-37.R
Saving _problems/test_designers-128.R
Saving _problems/test_diagnose_designers-6.R
[ FAIL 7 | WARN 16 | SKIP 0 | PASS 319 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_designers.R:37:7'): factorial_designer's default design runs. ──
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 256`: N is supplied by name.
Backtrace:
▆
1. ├─testthat::expect_is(...) at test_designers.R:37:7
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─DeclareDesign::diagnose_design(one_design, sims = 10, bootstrap_sims = FALSE)
5. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
6. └─base::mapply(...)
7. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
8. ├─base::withCallingHandlers(...)
9. ├─base::suppressWarnings(...)
10. │ └─base::withCallingHandlers(...)
11. └─DeclareDesign:::future_lapply(...)
12. └─base::lapply(...)
13. └─DeclareDesign (local) FUN(X[[i]], ...)
14. ├─DeclareDesign:::run_design_internal(design)
15. └─DeclareDesign:::run_design_internal.design(design)
16. └─DeclareDesign:::next_step(step, current_df, i)
17. └─base::tryCatch(...)
18. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
19. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
20. └─value[[3L]](cond)
── Error ('test_designers.R:128:9'): No column names in estimator data.frame conflict with parameters in factorial_designer ──
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 256`: N is supplied by name.
Backtrace:
▆
1. └─DeclareDesign::draw_estimates(the_designer()) at test_designers.R:128:9
2. └─DeclareDesign:::apply_on_design_dots(...)
3. └─base::lapply(designs, FUN)
4. └─DeclareDesign (local) FUN(X[[i]], ...)
5. └─DeclareDesign:::get_function_internal(...)
6. └─DeclareDesign:::run_design_internal.design(...)
7. └─DeclareDesign:::next_step(step, current_df, i)
8. └─base::tryCatch(...)
9. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
10. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
11. └─value[[3L]](cond)
── Error ('test_designers.R:37:7'): multi_arm_designer's default design runs. ──
Error: Error in step 6 (estimator):
Error in rbind.data.frame(ate_Y_2_1 = difference_in_means(formula = Y ~ : invalid list argument: all variables should have the same length
Backtrace:
▆
1. ├─testthat::expect_is(...) at test_designers.R:37:7
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─DeclareDesign::diagnose_design(one_design, sims = 10, bootstrap_sims = FALSE)
5. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
6. └─base::mapply(...)
7. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
8. ├─base::withCallingHandlers(...)
9. ├─base::suppressWarnings(...)
10. │ └─base::withCallingHandlers(...)
11. └─DeclareDesign:::future_lapply(...)
12. └─base::lapply(...)
13. └─DeclareDesign (local) FUN(X[[i]], ...)
14. ├─DeclareDesign:::run_design_internal(design)
15. └─DeclareDesign:::run_design_internal.design(design)
16. └─DeclareDesign:::next_step(step, current_df, i)
17. └─base::tryCatch(...)
18. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
19. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
20. └─value[[3L]](cond)
── Error ('test_designers.R:128:9'): No column names in estimator data.frame conflict with parameters in multi_arm_designer ──
Error: Error in step 6 (estimator):
Error in rbind.data.frame(ate_Y_2_1 = difference_in_means(formula = Y ~ : invalid list argument: all variables should have the same length
Backtrace:
▆
1. └─DeclareDesign::draw_estimates(the_designer()) at test_designers.R:128:9
2. └─DeclareDesign:::apply_on_design_dots(...)
3. └─base::lapply(designs, FUN)
4. └─DeclareDesign (local) FUN(X[[i]], ...)
5. └─DeclareDesign:::get_function_internal(...)
6. └─DeclareDesign:::run_design_internal.design(...)
7. └─DeclareDesign:::next_step(step, current_df, i)
8. └─base::tryCatch(...)
9. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
10. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
11. └─value[[3L]](cond)
── Error ('test_designers.R:37:7'): two_by_two_designer's default design runs. ──
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 100`: N is supplied by name.
Backtrace:
▆
1. ├─testthat::expect_is(...) at test_designers.R:37:7
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. └─DeclareDesign::diagnose_design(one_design, sims = 10, bootstrap_sims = FALSE)
5. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
6. └─base::mapply(...)
7. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
8. ├─base::withCallingHandlers(...)
9. ├─base::suppressWarnings(...)
10. │ └─base::withCallingHandlers(...)
11. └─DeclareDesign:::future_lapply(...)
12. └─base::lapply(...)
13. └─DeclareDesign (local) FUN(X[[i]], ...)
14. ├─DeclareDesign:::run_design_internal(design)
15. └─DeclareDesign:::run_design_internal.design(design)
16. └─DeclareDesign:::next_step(step, current_df, i)
17. └─base::tryCatch(...)
18. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
19. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
20. └─value[[3L]](cond)
── Error ('test_designers.R:128:9'): No column names in estimator data.frame conflict with parameters in two_by_two_designer ──
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 100`: N is supplied by name.
Backtrace:
▆
1. └─DeclareDesign::draw_estimates(the_designer()) at test_designers.R:128:9
2. └─DeclareDesign:::apply_on_design_dots(...)
3. └─base::lapply(designs, FUN)
4. └─DeclareDesign (local) FUN(X[[i]], ...)
5. └─DeclareDesign:::get_function_internal(...)
6. └─DeclareDesign:::run_design_internal.design(...)
7. └─DeclareDesign:::next_step(step, current_df, i)
8. └─base::tryCatch(...)
9. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
10. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
11. └─value[[3L]](cond)
── Error ('test_diagnose_designers.R:6:3'): with and without term ──────────────
Error: Error in step 1 ():
Error: Every column needs a name. Expression 1 in fabricate(), `N`, has none.
If this is the number of rows, write `N = 500`: N is supplied by name.
Backtrace:
▆
1. └─DeclareDesign::diagnose_design(...) at test_diagnose_designers.R:6:3
2. └─DeclareDesign::simulate_design(!!!dots, sims = sims, future.seed = future.seed)
3. └─base::mapply(...)
4. └─DeclareDesign (local) `<fn>`(design = dots[[1L]][[1L]], sims = dots[[2L]][[1L]], future.seed = dots[[3L]][[1L]])
5. ├─base::withCallingHandlers(...)
6. ├─base::suppressWarnings(...)
7. │ └─base::withCallingHandlers(...)
8. └─DeclareDesign:::future_lapply(...)
9. └─base::lapply(...)
10. └─DeclareDesign (local) FUN(X[[i]], ...)
11. ├─DeclareDesign:::run_design_internal(design)
12. └─DeclareDesign:::run_design_internal.design(design)
13. └─DeclareDesign:::next_step(step, current_df, i)
14. └─base::tryCatch(...)
15. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
16. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
17. └─value[[3L]](cond)
[ FAIL 7 | WARN 16 | SKIP 0 | PASS 319 ]
Error:
! Test failures.
Execution halted
Flavor: r-oldrel-windows-x86_64