Running ‘testthat.R’ [8s/9s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(mockery)
  > library(DataFakeR)
  > 
  > test_check("DataFakeR")
  [ FAIL 4 | WARN 2 | SKIP 1 | PASS 47 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (1)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-simulate_cols.R:18'): generate_deterministic creates values based on defined constraints and formulas ──
  Error in `purrr::modify(expr, prepare_expression)`: `.x` must be a vector, list, or data frame, not a call.
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(...) at test-simulate_cols.R:18:2
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─DataFakeR:::generate_deterministic(...)
   5.   └─DataFakeR:::prepare_expression(col_expr[[1]])
   6.     └─purrr::modify(expr, prepare_expression)
   7.       └─cli::cli_abort("{.arg .x} must be a vector, list, or data frame, not {.obj_type_friendly {.x}}.")
   8.         └─rlang::abort(...)
  ── Error ('test-simulate_cols.R:36'): fake_column fakes deterministic columns correctly ──
  Error in `purrr::modify(expr, prepare_expression)`: `.x` must be a vector, list, or data frame, not a call.
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(...) at test-simulate_cols.R:36:2
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─DataFakeR:::fake_column(...)
   5.   └─DataFakeR:::generate_deterministic(n, col_def, schema, faker_opts)
   6.     └─DataFakeR:::prepare_expression(col_expr[[1]])
   7.       └─purrr::modify(expr, prepare_expression)
   8.         └─cli::cli_abort("{.arg .x} must be a vector, list, or data frame, not {.obj_type_friendly {.x}}.")
   9.           └─rlang::abort(...)
  ── Error ('test-simulate_cols.R:91'): group_by parameter is supported by all methods ──
  <dplyr:::mutate_error/rlang_error/error/condition>
  Error in `mutate(d_tmp, ...)`: Problem while computing `state = tidygraph::map_bfs(...)`.
  Caused by error in `mutate()`:
  ! Problem while computing `state = tidygraph::map_bfs(...)`.
  Caused by error in `purrr::modify()`:
  ! `.x` must be a vector, list, or data frame, not a call.
  Backtrace:
       ▆
    1. ├─DataFakeR:::simulate_schema_obj(schema) at test-simulate_cols.R:91:2
    2. │ └─schema_obj$get_schema("graph") %>% ...
    3. ├─tidygraph::mutate(...)
    4. ├─tidygraph:::mutate.tbl_graph(...)
    5. │ └─tidygraph::mutate_as_tbl(.data, !!!dot)
    6. │   ├─dplyr::mutate(d_tmp, ...)
    7. │   └─dplyr:::mutate.data.frame(d_tmp, ...)
    8. │     └─dplyr:::mutate_cols(.data, dplyr_quosures(...), caller_env = caller_env())
    9. │       ├─base::withCallingHandlers(...)
   10. │       └─mask$eval_all_mutate(quo)
   11. ├─tidygraph::map_bfs(...)
   12. │ └─tidygraph:::call_nodes(graph, .f, search_df, paths, dot_params)
   13. │   ├─base::do.call(...)
   14. │   └─DataFakeR (local) `<fn>`(...)
   15. │     └─table %>% ...
   16. ├─tidygraph::mutate(...)
   17. ├─tidygraph:::mutate.tbl_graph(...)
   18. │ └─tidygraph::mutate_as_tbl(.data, !!!dot)
   19. │   ├─dplyr::mutate(d_tmp, ...)
   20. │   └─dplyr:::mutate.data.frame(d_tmp, ...)
   21. │     └─dplyr:::mutate_cols(.data, dplyr_quosures(...), caller_env = caller_env())
   22. │       ├─base::withCallingHandlers(...)
   23. │       └─mask$eval_all_mutate(quo)
   24. ├─tidygraph::map_bfs(...)
   25. │ └─tidygraph:::call_nodes(graph, .f, search_df, paths, dot_params)
   26. │   ├─base::do.call(...)
   27. │   └─DataFakeR (local) `<fn>`(...)
   28. │     └─DataFakeR:::fake_column(...)
   29. │       └─DataFakeR:::generate_deterministic(n, col_def, schema, faker_opts)
   30. │         └─DataFakeR:::prepare_expression(col_expr[[1]])
   31. │           └─purrr::modify(expr, prepare_expression)
   32. │             └─cli::cli_abort("{.arg .x} must be a vector, list, or data frame, not {.obj_type_friendly {.x}}.")
   33. │               └─rlang::abort(...)
   34. │                 └─rlang:::signal_abort(cnd, .file)
   35. │                   └─base::signalCondition(cnd)
   36. ├─dplyr (local) `<fn>`(`<rlng_rrr>`)
   37. │ └─rlang::abort(...)
   38. │   └─rlang:::signal_abort(cnd, .file)
   39. │     └─base::signalCondition(cnd)
   40. └─dplyr (local) `<fn>`(`<dply:::_>`)
   41.   └─rlang::abort(...)
  ── Error ('test-simulate_tables.R:19'): simulate_schema preserved defined rules properly ──
  <dplyr:::mutate_error/rlang_error/error/condition>
  Error in `mutate(d_tmp, ...)`: Problem while computing `state = tidygraph::map_bfs(...)`.
  Caused by error in `mutate()`:
  ! Problem while computing `state = tidygraph::map_bfs(...)`.
  Caused by error in `purrr::modify()`:
  ! `.x` must be a vector, list, or data frame, not a call.
  Backtrace:
       ▆
    1. ├─DataFakeR:::simulate_schema_obj(schema) at test-simulate_tables.R:19:2
    2. │ └─schema_obj$get_schema("graph") %>% ...
    3. ├─tidygraph::mutate(...)
    4. ├─tidygraph:::mutate.tbl_graph(...)
    5. │ └─tidygraph::mutate_as_tbl(.data, !!!dot)
    6. │   ├─dplyr::mutate(d_tmp, ...)
    7. │   └─dplyr:::mutate.data.frame(d_tmp, ...)
    8. │     └─dplyr:::mutate_cols(.data, dplyr_quosures(...), caller_env = caller_env())
    9. │       ├─base::withCallingHandlers(...)
   10. │       └─mask$eval_all_mutate(quo)
   11. ├─tidygraph::map_bfs(...)
   12. │ └─tidygraph:::call_nodes(graph, .f, search_df, paths, dot_params)
   13. │   ├─base::do.call(...)
   14. │   └─DataFakeR (local) `<fn>`(...)
   15. │     └─table %>% ...
   16. ├─tidygraph::mutate(...)
   17. ├─tidygraph:::mutate.tbl_graph(...)
   18. │ └─tidygraph::mutate_as_tbl(.data, !!!dot)
   19. │   ├─dplyr::mutate(d_tmp, ...)
   20. │   └─dplyr:::mutate.data.frame(d_tmp, ...)
   21. │     └─dplyr:::mutate_cols(.data, dplyr_quosures(...), caller_env = caller_env())
   22. │       ├─base::withCallingHandlers(...)
   23. │       └─mask$eval_all_mutate(quo)
   24. ├─tidygraph::map_bfs(...)
   25. │ └─tidygraph:::call_nodes(graph, .f, search_df, paths, dot_params)
   26. │   ├─base::do.call(...)
   27. │   └─DataFakeR (local) `<fn>`(...)
   28. │     └─DataFakeR:::fake_column(...)
   29. │       └─DataFakeR:::generate_deterministic(n, col_def, schema, faker_opts)
   30. │         └─DataFakeR:::prepare_expression(col_expr[[1]])
   31. │           └─purrr::modify(expr, prepare_expression)
   32. │             └─cli::cli_abort("{.arg .x} must be a vector, list, or data frame, not {.obj_type_friendly {.x}}.")
   33. │               └─rlang::abort(...)
   34. │                 └─rlang:::signal_abort(cnd, .file)
   35. │                   └─base::signalCondition(cnd)
   36. ├─dplyr (local) `<fn>`(`<rlng_rrr>`)
   37. │ └─rlang::abort(...)
   38. │   └─rlang:::signal_abort(cnd, .file)
   39. │     └─base::signalCondition(cnd)
   40. └─dplyr (local) `<fn>`(`<dply:::_>`)
   41.   └─rlang::abort(...)
  
  [ FAIL 4 | WARN 2 | SKIP 1 | PASS 47 ]
  Error: Test failures
  Execution halted