Running ‘testthat.R’ [5s/20s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(simTool)
  > 
  > test_check("simTool")
  [1] "Estimated replications per hour:  7618312"
  [1] "Estimated replications per hour:  14716856"
  [1] "Estimated replications per hour:  770555"
  
    |                                                                            
    |                                                                      |   0%[1] "With fallback!"
  
    |                                                                            
    |==============                                                        |  20%
    |                                                                            
    |============================                                          |  40%
    |                                                                            
    |==========================================                            |  60%[1] "Estimated replications per hour:  18897990"
  [1] "Estimated replications per hour:  15761476"
  [1] "Estimated replications per hour:  140121"
  [1] "Estimated replications per hour:  1981144"
  [1] "Estimated replications per hour:  215773"
  [1] "Estimated replications per hour:  3234889"
  [1] "Estimated replications per hour:  319945"
  ── 1. Error: Explicit defined .truth parameter of the data analyzing function ca
  non-conformable arrays
  1: expect_true(all(sapply(1:8, function(i) all(eg$simulation$df[[i]] == eg$simulation$results[[i]])))) at testthat/test_eval_tibbles.R:28
  2: quasi_label(enquo(object), label, arg = "object")
  3: eval_bare(get_expr(quo), get_env(quo))
  4: sapply(1:8, function(i) all(eg$simulation$df[[i]] == eg$simulation$results[[i]]))
  5: lapply(X = X, FUN = FUN, ...)
  6: FUN(X[[i]], ...)
  
  ── 2. Error: Explicit defined .truth parameter of the data analyzing function ca
  non-conformable arrays
  1: expect_true(all(sapply(1:8, function(i) all(eg$simulation$df[[i]] == eg$simulation$results[[i]])))) at testthat/test_eval_tibbles.R:51
  2: quasi_label(enquo(object), label, arg = "object")
  3: eval_bare(get_expr(quo), get_env(quo))
  4: sapply(1:8, function(i) all(eg$simulation$df[[i]] == eg$simulation$results[[i]]))
  5: lapply(X = X, FUN = FUN, ...)
  6: FUN(X[[i]], ...)
  
  ── 3. Error: Explicit defined .truth parameter of the post analyzing function ca
  non-conformable arrays
  1: expect_true(all(sapply(1:8, function(i) all(eg$simulation$df[[i]] == eg$simulation$results[[i]])))) at testthat/test_eval_tibbles.R:74
  2: quasi_label(enquo(object), label, arg = "object")
  3: eval_bare(get_expr(quo), get_env(quo))
  4: sapply(1:8, function(i) all(eg$simulation$df[[i]] == eg$simulation$results[[i]]))
  5: lapply(X = X, FUN = FUN, ...)
  6: FUN(X[[i]], ...)
  
  ── 4. Error: Warning if proc_grid has a .truth-column (@test_eval_tibbles.R#140)
  Column name `.truth` must not be duplicated.
  Use .name_repair to specify repair.
  1: expect_warning(eval_tibbles(dg, pg, rep = 2, envir = environment(), simplify = TRUE), 
         "\\.truth.*ignored") at testthat/test_eval_tibbles.R:140
  2: quasi_capture(enquo(object), label, capture_warnings)
  3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...)
  4: withCallingHandlers(code, warning = function(condition) {
         out$push(condition)
         invokeRestart("muffleWarning")
     })
  5: eval_bare(get_expr(.quo), get_env(.quo))
  6: eval_tibbles(dg, pg, rep = 2, envir = environment(), simplify = TRUE)
  7: frame_simulation(data_grid, proc_grid, simulation_list, summary_fun)
  8: tidyr::crossing(dg, replications = seq_along(sim[[1]]), summary_fun = names(summary_fun), 
         pg)
  9: flatten_nested(out, attr(cols, "named"))
  10: as_tibble(out)
  11: as_tibble.list(out)
  12: lst_to_tibble(x, .rows, .name_repair, col_lengths(x))
  13: set_repaired_names(x, .name_repair)
  14: set_names(x, repaired_names(names(x), .name_repair = .name_repair))
  15: set_names_impl(x, x, nm, ...)
  16: is_function(nm)
  17: is_closure(x)
  18: repaired_names(names(x), .name_repair = .name_repair)
  19: check_unique(new_name)
  20: abort(error_column_names_must_be_unique(name[dups]))
  
  ── 5. Failure: Tibbles for data generating functions can be used. Results were c
  eg$simulation[[col]] not identical to expected_df[[col]].
  4/8 mismatches
  x[3]: "genData1"
  y[3]: "genData2"
  
  x[4]: "genData1"
  y[4]: "genData2"
  
  x[5]: "genData2"
  y[5]: "genData1"
  
  x[6]: "genData2"
  y[6]: "genData1"
  
  ── 6. Failure: Tibbles for data generating functions can be used. Results were c
  eg$simulation[[col]] not identical to expected_df[[col]].
  Component 3: Attributes: < Component 1: Mean relative difference: 0.25 >
  Component 3: Numeric: lengths (8, 6) differ
  Component 4: Attributes: < Component 1: Mean relative difference: 0.25 >
  Component 4: Numeric: lengths (8, 6) differ
  Component 5: Attributes: < Component 1: Mean relative difference: 0.3333333 >
  Component 5: Numeric: lengths (6, 8) differ
  Component 6: Attributes: < Component 1: Mean relative difference: 0.3333333 >
  Component 6: Numeric: lengths (6, 8) differ
  
  ── 7. Failure: Three analyzing functions. Results were created and stored in sim
  eg$simulation[[col]] not identical to expected_df[[col]].
  12/18 mismatches
  x[1]: "length"
  y[1]: "rng"
  
  x[3]: "rng"
  y[3]: "length"
  
  x[4]: "length"
  y[4]: "rng"
  
  x[6]: "rng"
  y[6]: "length"
  
  x[7]: "length"
  y[7]: "rng"
  
  ── 8. Failure: Three analyzing functions and one summary function. Results were 
  eg$simulation[[col]] not identical to expected_df[[col]].
  6/9 mismatches
  x[1]: "length"
  y[1]: "rng"
  
  x[3]: "rng"
  y[3]: "length"
  
  x[4]: "length"
  y[4]: "rng"
  
  x[6]: "rng"
  y[6]: "length"
  
  x[7]: "length"
  y[7]: "rng"
  
  ── 9. Failure: Three analyzing functions and three summary function. Results wer
  eg$simulation[[col]] not identical to expected_df[[col]].
  18/27 mismatches
  x[1]: "length"
  y[1]: "rng"
  
  x[3]: "rng"
  y[3]: "length"
  
  x[4]: "length"
  y[4]: "rng"
  
  x[6]: "rng"
  y[6]: "length"
  
  x[7]: "length"
  y[7]: "rng"
  
  ── 10. Failure: Three analyzing functions and one summary function over 2 cpus. 
  eg$simulation[[col]] not identical to expected_df[[col]].
  6/9 mismatches
  x[1]: "length"
  y[1]: "rng"
  
  x[3]: "rng"
  y[3]: "length"
  
  x[4]: "length"
  y[4]: "rng"
  
  x[6]: "rng"
  y[6]: "length"
  
  x[7]: "length"
  y[7]: "rng"
  
  ── 11. Failure: Create a tibble containing the results for every replication (@t
  fs$results not identical to fs$expected.
  12/24 mismatches
  x[7]: "Gen B 1 Ana A"
  y[7]: "Gen A 2 Ana A"
  
  x[8]: "Gen B 1 Ana B"
  y[8]: "Gen A 2 Ana B"
  
  x[9]: "Gen B 1 Ana C"
  y[9]: "Gen A 2 Ana C"
  
  x[10]: "Gen B 1 Ana A"
  y[10]: "Gen A 2 Ana A"
  
  x[11]: "Gen B 1 Ana B"
  y[11]: "Gen A 2 Ana B"
  
  ── 12. Failure: Create a tibble containing the results sumamrized by one summary
  fs$results not identical to fs$expected.
  6/12 mismatches
  x[4]: "Gen B 1 Ana A"
  y[4]: "Gen A 2 Ana A"
  
  x[5]: "Gen B 1 Ana B"
  y[5]: "Gen A 2 Ana B"
  
  x[6]: "Gen B 1 Ana C"
  y[6]: "Gen A 2 Ana C"
  
  x[7]: "Gen A 2 Ana A"
  y[7]: "Gen B 1 Ana A"
  
  x[8]: "Gen A 2 Ana B"
  y[8]: "Gen B 1 Ana B"
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  [ OK: 108 | SKIPPED: 0 | WARNINGS: 19 | FAILED: 12 ]
  1. Error: Explicit defined .truth parameter of the data analyzing function can access the matrix for the data generating function (@test_eval_tibbles.R#28) 
  2. Error: Explicit defined .truth parameter of the data analyzing function can access the matrix for the data generating function (@test_eval_tibbles.R#51) 
  3. Error: Explicit defined .truth parameter of the post analyzing function can access the matrix for the data generating function (@test_eval_tibbles.R#74) 
  4. Error: Warning if proc_grid has a .truth-column (@test_eval_tibbles.R#140) 
  5. Failure: Tibbles for data generating functions can be used. Results were created and stored in simulation (@test_eval_tibbles.R#212) 
  6. Failure: Tibbles for data generating functions can be used. Results were created and stored in simulation (@test_eval_tibbles.R#212) 
  7. Failure: Three analyzing functions. Results were created and stored in simulation (@test_eval_tibbles.R#456) 
  8. Failure: Three analyzing functions and one summary function. Results were created and stored in simulation (@test_eval_tibbles.R#534) 
  9. Failure: Three analyzing functions and three summary function. Results were created and stored in simulation (@test_eval_tibbles.R#680) 
  1. ...
  
  Error: testthat unit tests failed
  Execution halted