Last updated on 2025-12-20 11:50:32 CET.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 0.5.7 | 21.75 | 130.55 | 152.30 | ERROR | |
| r-devel-linux-x86_64-debian-gcc | 0.5.7 | 12.16 | 83.17 | 95.33 | ERROR | |
| r-devel-linux-x86_64-fedora-clang | 0.5.7 | 41.00 | 194.35 | 235.35 | ERROR | |
| r-devel-linux-x86_64-fedora-gcc | 0.5.7 | 38.00 | 192.53 | 230.53 | ERROR | |
| r-devel-windows-x86_64 | 0.5.7 | 28.00 | 135.00 | 163.00 | NOTE | |
| r-patched-linux-x86_64 | 0.5.7 | 22.11 | 112.68 | 134.79 | NOTE | |
| r-release-linux-x86_64 | 0.5.7 | 20.14 | 112.18 | 132.32 | NOTE | |
| r-release-macos-arm64 | 0.5.7 | OK | ||||
| r-release-macos-x86_64 | 0.5.7 | 14.00 | 68.00 | 82.00 | OK | |
| r-release-windows-x86_64 | 0.5.7 | 27.00 | 131.00 | 158.00 | NOTE | |
| r-oldrel-macos-arm64 | 0.5.7 | OK | ||||
| r-oldrel-macos-x86_64 | 0.5.7 | 14.00 | 88.00 | 102.00 | OK | |
| r-oldrel-windows-x86_64 | 0.5.7 | 34.00 | 173.00 | 207.00 | NOTE |
Version: 0.5.7
Check: dependencies in R code
Result: NOTE
Unexported object imported by a ':::' call: ‘bupaR:::apply_grouped_fun’
See the note in ?`:::` about the use of this operator.
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc, r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-devel-windows-x86_64, r-patched-linux-x86_64, r-release-linux-x86_64, r-release-windows-x86_64, r-oldrel-windows-x86_64
Version: 0.5.7
Check: examples
Result: ERROR
Running examples in ‘processmapR-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: dotted_chart
> ### Title: Dotted Chart
> ### Aliases: dotted_chart dotted_chart.eventlog dotted_chart.activitylog
> ### dotted_chart.grouped_eventlog dotted_chart.grouped_activitylog
>
> ### ** Examples
>
> library(processmapR)
> library(eventdataR)
>
> patients %>%
+ dotted_chart(x = "absolute", sort = "start", color = "employee")
Error in `[.data.table`(., , `:=`(rank, paste0("ACTIVITY_RANKED_AS_", :
attempt access index 6/6 in VECTOR_ELT
Calls: %>% ... dcast.data.table -> is.data.table -> [ -> [.data.table
Execution halted
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc
Version: 0.5.7
Check: tests
Result: ERROR
Running ‘testthat.R’ [37s/34s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(processmapR)
Attaching package: 'processmapR'
The following object is masked from 'package:stats':
frequency
>
> test_check("processmapR")
Saving _problems/test_dotted_chart-12.R
Saving _problems/test_dotted_chart-17.R
Saving _problems/test_dotted_chart-30.R
Saving _problems/test_dotted_chart-36.R
Saving _problems/test_dotted_chart-42.R
Saving _problems/test_dotted_chart-48.R
Saving _problems/test_dotted_chart-59.R
Saving _problems/test_dotted_chart-65.R
Saving _problems/test_dotted_chart-71.R
Saving _problems/test_dotted_chart-77.R
Saving _problems/test_dotted_chart-83.R
Saving _problems/test_dotted_chart-89.R
Saving _problems/test_dotted_chart-100.R
Saving _problems/test_dotted_chart-106.R
Saving _problems/test_dotted_chart-112.R
Saving _problems/test_dotted_chart-130.R
Saving _problems/test_dotted_chart-136.R
Saving _problems/test_dotted_chart-142.R
Saving _problems/test_dotted_chart-148.R
Saving _problems/test_dotted_chart-154.R
Saving _problems/test_dotted_chart-160.R
Saving _problems/test_dotted_chart-171.R
Saving _problems/test_dotted_chart-177.R
Saving _problems/test_dotted_chart-188.R
Saving _problems/test_dotted_chart-190.R
Saving _problems/test_dotted_chart-209.R
Saving _problems/test_dotted_chart-214.R
Saving _problems/test_dotted_chart-230.R
Saving _problems/test_dotted_chart-235.R
Saving _problems/test_dotted_chart-248.R
Saving _problems/test_dotted_chart-253.R
Saving _problems/test_dotted_chart_helpers-87.R
[ FAIL 32 | WARN 0 | SKIP 11 | PASS 70 ]
══ Skipped tests (11) ══════════════════════════════════════════════════════════
• On CRAN (7): 'test_dotted_chart.R:92:1', 'test_lined_chart.R:68:1',
'test_trace_explorer.R:4:1', 'test_trace_explorer.R:18:1',
'test_trace_explorer.R:50:1', 'test_trace_explorer.R:86:1',
'test_trace_explorer.R:246:1'
• depends on timezone (3): 'test_dotted_chart_helpers.R:5:3',
'test_dotted_chart_helpers.R:12:3', 'test_dotted_chart_helpers.R:71:3'
• depends on timezones (1): 'test_dotted_chart_helpers.R:31:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test_dotted_chart.R:8:2'): test dotted_chart on eventlog with default params ──
Expected `chart <- patients %>% dotted_chart()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:8:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart()
8. ├─processmapR::dotted_chart(.)
9. ├─processmapR:::dotted_chart.eventlog(.)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Error ('test_dotted_chart.R:13:2'): test dotted_chart on eventlog with default params ──
Error in ``[.data.table`(., , `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case)`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(patients %>% dotted_chart(), NA) at test_dotted_chart.R:13:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart()
8. ├─processmapR::dotted_chart(.)
9. ├─processmapR:::dotted_chart.eventlog(.)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:26:2'): test dotted_chart on eventlog with param `x` ──
Expected `patients %>% dotted_chart(x = "absolute")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:26:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "absolute")
8. ├─processmapR::dotted_chart(., x = "absolute")
9. ├─processmapR:::dotted_chart.eventlog(., x = "absolute")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:32:2'): test dotted_chart on eventlog with param `x` ──
Expected `patients %>% dotted_chart(x = "relative")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:32:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative")
8. ├─processmapR::dotted_chart(., x = "relative")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:38:2'): test dotted_chart on eventlog with param `x` ──
Expected `patients %>% dotted_chart(x = "relative_week")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:38:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative_week")
8. ├─processmapR::dotted_chart(., x = "relative_week")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative_week")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:44:2'): test dotted_chart on eventlog with param `x` ──
Expected `patients %>% dotted_chart(x = "relative_day")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:44:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative_day")
8. ├─processmapR::dotted_chart(., x = "relative_day")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative_day")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:55:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "auto")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:55:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "auto")
8. ├─processmapR::dotted_chart(., sort = "auto")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "auto")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:61:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "start")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:61:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "start")
8. ├─processmapR::dotted_chart(., sort = "start")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "start")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:67:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "end")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:67:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "end")
8. ├─processmapR::dotted_chart(., sort = "end")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "end")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:73:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "duration")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:73:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "duration")
8. ├─processmapR::dotted_chart(., sort = "duration")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "duration")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:79:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "start_week")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:79:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "start_week")
8. ├─processmapR::dotted_chart(., sort = "start_week")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "start_week")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:85:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "start_day")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:85:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "start_day")
8. ├─processmapR::dotted_chart(., sort = "start_day")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "start_day")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:96:2'): test dotted_chart on eventlog with param `color` ──
Expected `patients %>% dotted_chart(color = NULL)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:96:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(color = NULL)
8. ├─processmapR::dotted_chart(., color = NULL)
9. ├─processmapR:::dotted_chart.eventlog(., color = NULL)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:102:2'): test dotted_chart on eventlog with param `color` ──
Expected `patients %>% dotted_chart(color = NA)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:102:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(color = NA)
8. ├─processmapR::dotted_chart(., color = NA)
9. ├─processmapR:::dotted_chart.eventlog(., color = NA)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:108:2'): test dotted_chart on eventlog with param `color` ──
Expected `patients %>% dotted_chart(color = resource_id(.))` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:108:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(color = resource_id(.))
8. ├─processmapR::dotted_chart(., color = resource_id(.))
9. ├─processmapR:::dotted_chart.eventlog(., color = resource_id(.))
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:126:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "auto")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:126:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "auto")
8. ├─processmapR::dotted_chart(., x = "relative", units = "auto")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "auto")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:132:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "secs")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:132:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "secs")
8. ├─processmapR::dotted_chart(., x = "relative", units = "secs")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "secs")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:138:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "mins")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:138:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "mins")
8. ├─processmapR::dotted_chart(., x = "relative", units = "mins")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "mins")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:144:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "hours")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:144:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "hours")
8. ├─processmapR::dotted_chart(., x = "relative", units = "hours")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "hours")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:150:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "days")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:150:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "days")
8. ├─processmapR::dotted_chart(., x = "relative", units = "days")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "days")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:156:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "weeks")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:156:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "weeks")
8. ├─processmapR::dotted_chart(., x = "relative", units = "weeks")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "weeks")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:167:2'): test dotted_chart on eventlog with param `add_end_events` ──
Expected `patients %>% dotted_chart(add_end_events = FALSE)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:167:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(add_end_events = FALSE)
8. ├─processmapR::dotted_chart(., add_end_events = FALSE)
9. ├─processmapR:::dotted_chart.eventlog(., add_end_events = FALSE)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:173:2'): test dotted_chart on eventlog with param `add_end_events` ──
Expected `patients %>% dotted_chart(add_end_events = TRUE)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:173:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(add_end_events = TRUE)
8. ├─processmapR::dotted_chart(., add_end_events = TRUE)
9. ├─processmapR:::dotted_chart.eventlog(., add_end_events = TRUE)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:184:2'): test dotted_chart on eventlog with param `plotly` ──
Expected `chart <- patients %>% dotted_chart(plotly = FALSE)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:184:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(plotly = FALSE)
8. ├─processmapR::dotted_chart(., plotly = FALSE)
9. ├─processmapR:::dotted_chart.eventlog(., plotly = FALSE)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Error ('test_dotted_chart.R:190:2'): test dotted_chart on eventlog with param `plotly` ──
Error in `eval(code, test_env)`: object 'chart' not found
Backtrace:
▆
1. └─testthat::expect_s3_class(chart, "ggplot") at test_dotted_chart.R:190:9
2. └─testthat::quasi_label(enquo(object))
3. └─rlang::eval_bare(expr, quo_get_env(quo))
── Failure ('test_dotted_chart.R:205:2'): test dotted_chart on grouped_eventlog with default params ──
Expected `chart <- patients_grouped_resource %>% dotted_chart()` not to throw any errors.
Actually got a <dplyr:::mutate_error> with message:
i In argument: `data = map(data, fun, ...)`.
Caused by error in `map()`:
i In index: 1.
Caused by error in `[.data.table`:
! attempt access index 6/6 in VECTOR_ELT
── Error ('test_dotted_chart.R:210:2'): test dotted_chart on grouped_eventlog with default params ──
<dplyr:::mutate_error/rlang_error/error/condition>
Error in `mutate(., data = map(data, fun, ...))`: i In argument: `data = map(data, fun, ...)`.
Caused by error in `map()`:
i In index: 1.
Caused by error in `[.data.table`:
! attempt access index 6/6 in VECTOR_ELT
── Failure ('test_dotted_chart.R:226:2'): test dotted_chart on activitylog with default params ──
Expected `chart <- patients_act %>% dotted_chart()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:226:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients_act %>% dotted_chart()
8. ├─processmapR::dotted_chart(.)
9. ├─processmapR:::dotted_chart.activitylog(.)
10. │ └─processmapR:::dotted_chart.eventlog(...)
11. │ └─log %>% dotted_chart_data(color, units) %>% ...
12. ├─processmapR:::dotted_chart_plot(...)
13. │ └─dplyr::groups(data)
14. ├─processmapR:::dotted_chart_data(., color, units)
15. │ └─... %>% ...
16. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
17. │ └─dplyr:::manip_if(...)
18. │ └─dplyr:::tbl_if_syms(...)
19. │ ├─rlang::syms(...)
20. │ │ └─rlang:::map(x, sym)
21. │ │ └─base::lapply(.x, .f, ...)
22. │ └─dplyr:::tbl_if_vars(...)
23. │ └─dplyr::tbl_vars(.tbl)
24. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
25. │ │ └─base::structure(...)
26. │ └─dplyr:::tbl_vars_dispatch(x)
27. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
28. │ └─data.table::is.data.table(data)
29. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
30. └─data.table:::`[.data.table`(...)
── Error ('test_dotted_chart.R:231:2'): test dotted_chart on activitylog with default params ──
Error in ``[.data.table`(., , `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case)`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(patients_act %>% dotted_chart(), NA) at test_dotted_chart.R:231:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients_act %>% dotted_chart()
8. ├─processmapR::dotted_chart(.)
9. ├─processmapR:::dotted_chart.activitylog(.)
10. │ └─processmapR:::dotted_chart.eventlog(...)
11. │ └─log %>% dotted_chart_data(color, units) %>% ...
12. ├─processmapR:::dotted_chart_plot(...)
13. │ └─dplyr::groups(data)
14. ├─processmapR:::dotted_chart_data(., color, units)
15. │ └─... %>% ...
16. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
17. │ └─dplyr:::manip_if(...)
18. │ └─dplyr:::tbl_if_syms(...)
19. │ ├─rlang::syms(...)
20. │ │ └─rlang:::map(x, sym)
21. │ │ └─base::lapply(.x, .f, ...)
22. │ └─dplyr:::tbl_if_vars(...)
23. │ └─dplyr::tbl_vars(.tbl)
24. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
25. │ │ └─base::structure(...)
26. │ └─dplyr:::tbl_vars_dispatch(x)
27. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
28. │ └─data.table::is.data.table(data)
29. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
30. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:244:2'): test dotted_chart on grouped_activitylog with default params ──
Expected `chart <- patients_act_grouped_resource %>% dotted_chart()` not to throw any errors.
Actually got a <dplyr:::mutate_error> with message:
i In argument: `data = map(data, fun, ...)`.
Caused by error in `map()`:
i In index: 1.
Caused by error in `[.data.table`:
! attempt access index 6/6 in VECTOR_ELT
── Error ('test_dotted_chart.R:249:2'): test dotted_chart on grouped_activitylog with default params ──
<dplyr:::mutate_error/rlang_error/error/condition>
Error in `mutate(., data = map(data, fun, ...))`: i In argument: `data = map(data, fun, ...)`.
Caused by error in `map()`:
i In index: 1.
Caused by error in `[.data.table`:
! attempt access index 6/6 in VECTOR_ELT
── Error ('test_dotted_chart_helpers.R:87:3'): test dotted_chart_data dimensions, columns, and content ──
Error in ``[.data.table`(., , `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case)`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─processmapR:::dotted_chart_data(patients, NULL, "mins") at test_dotted_chart_helpers.R:87:3
2. │ └─... %>% ...
3. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
4. │ └─dplyr:::manip_if(...)
5. │ └─dplyr:::tbl_if_syms(...)
6. │ ├─rlang::syms(...)
7. │ │ └─rlang:::map(x, sym)
8. │ │ └─base::lapply(.x, .f, ...)
9. │ └─dplyr:::tbl_if_vars(...)
10. │ └─dplyr::tbl_vars(.tbl)
11. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
12. │ │ └─base::structure(...)
13. │ └─dplyr:::tbl_vars_dispatch(x)
14. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
15. │ └─data.table::is.data.table(data)
16. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
17. └─data.table:::`[.data.table`(...)
[ FAIL 32 | WARN 0 | SKIP 11 | PASS 70 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-debian-clang
Version: 0.5.7
Check: tests
Result: ERROR
Running ‘testthat.R’ [19s/20s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(processmapR)
Attaching package: 'processmapR'
The following object is masked from 'package:stats':
frequency
>
> test_check("processmapR")
Saving _problems/test_dotted_chart-12.R
Saving _problems/test_dotted_chart-17.R
Saving _problems/test_dotted_chart-30.R
Saving _problems/test_dotted_chart-36.R
Saving _problems/test_dotted_chart-42.R
Saving _problems/test_dotted_chart-48.R
Saving _problems/test_dotted_chart-59.R
Saving _problems/test_dotted_chart-65.R
Saving _problems/test_dotted_chart-71.R
Saving _problems/test_dotted_chart-77.R
Saving _problems/test_dotted_chart-83.R
Saving _problems/test_dotted_chart-89.R
Saving _problems/test_dotted_chart-100.R
Saving _problems/test_dotted_chart-106.R
Saving _problems/test_dotted_chart-112.R
Saving _problems/test_dotted_chart-130.R
Saving _problems/test_dotted_chart-136.R
Saving _problems/test_dotted_chart-142.R
Saving _problems/test_dotted_chart-148.R
Saving _problems/test_dotted_chart-154.R
Saving _problems/test_dotted_chart-160.R
Saving _problems/test_dotted_chart-171.R
Saving _problems/test_dotted_chart-177.R
Saving _problems/test_dotted_chart-188.R
Saving _problems/test_dotted_chart-190.R
Saving _problems/test_dotted_chart-209.R
Saving _problems/test_dotted_chart-214.R
Saving _problems/test_dotted_chart-230.R
Saving _problems/test_dotted_chart-235.R
Saving _problems/test_dotted_chart-248.R
Saving _problems/test_dotted_chart-253.R
Saving _problems/test_dotted_chart_helpers-87.R
[ FAIL 32 | WARN 0 | SKIP 11 | PASS 70 ]
══ Skipped tests (11) ══════════════════════════════════════════════════════════
• On CRAN (7): 'test_dotted_chart.R:92:1', 'test_lined_chart.R:68:1',
'test_trace_explorer.R:4:1', 'test_trace_explorer.R:18:1',
'test_trace_explorer.R:50:1', 'test_trace_explorer.R:86:1',
'test_trace_explorer.R:246:1'
• depends on timezone (3): 'test_dotted_chart_helpers.R:5:3',
'test_dotted_chart_helpers.R:12:3', 'test_dotted_chart_helpers.R:71:3'
• depends on timezones (1): 'test_dotted_chart_helpers.R:31:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test_dotted_chart.R:8:2'): test dotted_chart on eventlog with default params ──
Expected `chart <- patients %>% dotted_chart()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:8:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart()
8. ├─processmapR::dotted_chart(.)
9. ├─processmapR:::dotted_chart.eventlog(.)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Error ('test_dotted_chart.R:13:2'): test dotted_chart on eventlog with default params ──
Error in ``[.data.table`(., , `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case)`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(patients %>% dotted_chart(), NA) at test_dotted_chart.R:13:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart()
8. ├─processmapR::dotted_chart(.)
9. ├─processmapR:::dotted_chart.eventlog(.)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:26:2'): test dotted_chart on eventlog with param `x` ──
Expected `patients %>% dotted_chart(x = "absolute")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:26:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "absolute")
8. ├─processmapR::dotted_chart(., x = "absolute")
9. ├─processmapR:::dotted_chart.eventlog(., x = "absolute")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:32:2'): test dotted_chart on eventlog with param `x` ──
Expected `patients %>% dotted_chart(x = "relative")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:32:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative")
8. ├─processmapR::dotted_chart(., x = "relative")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:38:2'): test dotted_chart on eventlog with param `x` ──
Expected `patients %>% dotted_chart(x = "relative_week")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:38:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative_week")
8. ├─processmapR::dotted_chart(., x = "relative_week")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative_week")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:44:2'): test dotted_chart on eventlog with param `x` ──
Expected `patients %>% dotted_chart(x = "relative_day")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:44:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative_day")
8. ├─processmapR::dotted_chart(., x = "relative_day")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative_day")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:55:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "auto")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:55:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "auto")
8. ├─processmapR::dotted_chart(., sort = "auto")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "auto")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:61:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "start")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:61:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "start")
8. ├─processmapR::dotted_chart(., sort = "start")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "start")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:67:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "end")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:67:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "end")
8. ├─processmapR::dotted_chart(., sort = "end")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "end")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:73:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "duration")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:73:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "duration")
8. ├─processmapR::dotted_chart(., sort = "duration")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "duration")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:79:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "start_week")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:79:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "start_week")
8. ├─processmapR::dotted_chart(., sort = "start_week")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "start_week")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:85:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "start_day")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:85:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "start_day")
8. ├─processmapR::dotted_chart(., sort = "start_day")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "start_day")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:96:2'): test dotted_chart on eventlog with param `color` ──
Expected `patients %>% dotted_chart(color = NULL)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:96:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(color = NULL)
8. ├─processmapR::dotted_chart(., color = NULL)
9. ├─processmapR:::dotted_chart.eventlog(., color = NULL)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:102:2'): test dotted_chart on eventlog with param `color` ──
Expected `patients %>% dotted_chart(color = NA)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:102:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(color = NA)
8. ├─processmapR::dotted_chart(., color = NA)
9. ├─processmapR:::dotted_chart.eventlog(., color = NA)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:108:2'): test dotted_chart on eventlog with param `color` ──
Expected `patients %>% dotted_chart(color = resource_id(.))` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:108:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(color = resource_id(.))
8. ├─processmapR::dotted_chart(., color = resource_id(.))
9. ├─processmapR:::dotted_chart.eventlog(., color = resource_id(.))
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:126:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "auto")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:126:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "auto")
8. ├─processmapR::dotted_chart(., x = "relative", units = "auto")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "auto")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:132:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "secs")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:132:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "secs")
8. ├─processmapR::dotted_chart(., x = "relative", units = "secs")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "secs")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:138:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "mins")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:138:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "mins")
8. ├─processmapR::dotted_chart(., x = "relative", units = "mins")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "mins")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:144:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "hours")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:144:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "hours")
8. ├─processmapR::dotted_chart(., x = "relative", units = "hours")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "hours")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:150:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "days")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:150:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "days")
8. ├─processmapR::dotted_chart(., x = "relative", units = "days")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "days")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:156:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "weeks")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:156:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "weeks")
8. ├─processmapR::dotted_chart(., x = "relative", units = "weeks")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "weeks")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:167:2'): test dotted_chart on eventlog with param `add_end_events` ──
Expected `patients %>% dotted_chart(add_end_events = FALSE)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:167:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(add_end_events = FALSE)
8. ├─processmapR::dotted_chart(., add_end_events = FALSE)
9. ├─processmapR:::dotted_chart.eventlog(., add_end_events = FALSE)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:173:2'): test dotted_chart on eventlog with param `add_end_events` ──
Expected `patients %>% dotted_chart(add_end_events = TRUE)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:173:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(add_end_events = TRUE)
8. ├─processmapR::dotted_chart(., add_end_events = TRUE)
9. ├─processmapR:::dotted_chart.eventlog(., add_end_events = TRUE)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:184:2'): test dotted_chart on eventlog with param `plotly` ──
Expected `chart <- patients %>% dotted_chart(plotly = FALSE)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:184:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(plotly = FALSE)
8. ├─processmapR::dotted_chart(., plotly = FALSE)
9. ├─processmapR:::dotted_chart.eventlog(., plotly = FALSE)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Error ('test_dotted_chart.R:190:2'): test dotted_chart on eventlog with param `plotly` ──
Error in `eval(code, test_env)`: object 'chart' not found
Backtrace:
▆
1. └─testthat::expect_s3_class(chart, "ggplot") at test_dotted_chart.R:190:9
2. └─testthat::quasi_label(enquo(object))
3. └─rlang::eval_bare(expr, quo_get_env(quo))
── Failure ('test_dotted_chart.R:205:2'): test dotted_chart on grouped_eventlog with default params ──
Expected `chart <- patients_grouped_resource %>% dotted_chart()` not to throw any errors.
Actually got a <dplyr:::mutate_error> with message:
i In argument: `data = map(data, fun, ...)`.
Caused by error in `map()`:
i In index: 1.
Caused by error in `[.data.table`:
! attempt access index 6/6 in VECTOR_ELT
── Error ('test_dotted_chart.R:210:2'): test dotted_chart on grouped_eventlog with default params ──
<dplyr:::mutate_error/rlang_error/error/condition>
Error in `mutate(., data = map(data, fun, ...))`: i In argument: `data = map(data, fun, ...)`.
Caused by error in `map()`:
i In index: 1.
Caused by error in `[.data.table`:
! attempt access index 6/6 in VECTOR_ELT
── Failure ('test_dotted_chart.R:226:2'): test dotted_chart on activitylog with default params ──
Expected `chart <- patients_act %>% dotted_chart()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:226:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients_act %>% dotted_chart()
8. ├─processmapR::dotted_chart(.)
9. ├─processmapR:::dotted_chart.activitylog(.)
10. │ └─processmapR:::dotted_chart.eventlog(...)
11. │ └─log %>% dotted_chart_data(color, units) %>% ...
12. ├─processmapR:::dotted_chart_plot(...)
13. │ └─dplyr::groups(data)
14. ├─processmapR:::dotted_chart_data(., color, units)
15. │ └─... %>% ...
16. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
17. │ └─dplyr:::manip_if(...)
18. │ └─dplyr:::tbl_if_syms(...)
19. │ ├─rlang::syms(...)
20. │ │ └─rlang:::map(x, sym)
21. │ │ └─base::lapply(.x, .f, ...)
22. │ └─dplyr:::tbl_if_vars(...)
23. │ └─dplyr::tbl_vars(.tbl)
24. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
25. │ │ └─base::structure(...)
26. │ └─dplyr:::tbl_vars_dispatch(x)
27. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
28. │ └─data.table::is.data.table(data)
29. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
30. └─data.table:::`[.data.table`(...)
── Error ('test_dotted_chart.R:231:2'): test dotted_chart on activitylog with default params ──
Error in ``[.data.table`(., , `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case)`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(patients_act %>% dotted_chart(), NA) at test_dotted_chart.R:231:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients_act %>% dotted_chart()
8. ├─processmapR::dotted_chart(.)
9. ├─processmapR:::dotted_chart.activitylog(.)
10. │ └─processmapR:::dotted_chart.eventlog(...)
11. │ └─log %>% dotted_chart_data(color, units) %>% ...
12. ├─processmapR:::dotted_chart_plot(...)
13. │ └─dplyr::groups(data)
14. ├─processmapR:::dotted_chart_data(., color, units)
15. │ └─... %>% ...
16. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
17. │ └─dplyr:::manip_if(...)
18. │ └─dplyr:::tbl_if_syms(...)
19. │ ├─rlang::syms(...)
20. │ │ └─rlang:::map(x, sym)
21. │ │ └─base::lapply(.x, .f, ...)
22. │ └─dplyr:::tbl_if_vars(...)
23. │ └─dplyr::tbl_vars(.tbl)
24. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
25. │ │ └─base::structure(...)
26. │ └─dplyr:::tbl_vars_dispatch(x)
27. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
28. │ └─data.table::is.data.table(data)
29. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
30. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:244:2'): test dotted_chart on grouped_activitylog with default params ──
Expected `chart <- patients_act_grouped_resource %>% dotted_chart()` not to throw any errors.
Actually got a <dplyr:::mutate_error> with message:
i In argument: `data = map(data, fun, ...)`.
Caused by error in `map()`:
i In index: 1.
Caused by error in `[.data.table`:
! attempt access index 6/6 in VECTOR_ELT
── Error ('test_dotted_chart.R:249:2'): test dotted_chart on grouped_activitylog with default params ──
<dplyr:::mutate_error/rlang_error/error/condition>
Error in `mutate(., data = map(data, fun, ...))`: i In argument: `data = map(data, fun, ...)`.
Caused by error in `map()`:
i In index: 1.
Caused by error in `[.data.table`:
! attempt access index 6/6 in VECTOR_ELT
── Error ('test_dotted_chart_helpers.R:87:3'): test dotted_chart_data dimensions, columns, and content ──
Error in ``[.data.table`(., , `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case)`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─processmapR:::dotted_chart_data(patients, NULL, "mins") at test_dotted_chart_helpers.R:87:3
2. │ └─... %>% ...
3. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
4. │ └─dplyr:::manip_if(...)
5. │ └─dplyr:::tbl_if_syms(...)
6. │ ├─rlang::syms(...)
7. │ │ └─rlang:::map(x, sym)
8. │ │ └─base::lapply(.x, .f, ...)
9. │ └─dplyr:::tbl_if_vars(...)
10. │ └─dplyr::tbl_vars(.tbl)
11. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
12. │ │ └─base::structure(...)
13. │ └─dplyr:::tbl_vars_dispatch(x)
14. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
15. │ └─data.table::is.data.table(data)
16. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
17. └─data.table:::`[.data.table`(...)
[ FAIL 32 | WARN 0 | SKIP 11 | PASS 70 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 0.5.7
Check: examples
Result: ERROR
Running examples in ‘processmapR-Ex.R’ failed
The error most likely occurred in:
> ### Name: dotted_chart
> ### Title: Dotted Chart
> ### Aliases: dotted_chart dotted_chart.eventlog dotted_chart.activitylog
> ### dotted_chart.grouped_eventlog dotted_chart.grouped_activitylog
>
> ### ** Examples
>
> library(processmapR)
> library(eventdataR)
>
> patients %>%
+ dotted_chart(x = "absolute", sort = "start", color = "employee")
Error in `[.data.table`(., , `:=`(rank, paste0("ACTIVITY_RANKED_AS_", :
attempt access index 6/6 in VECTOR_ELT
Calls: %>% ... dcast.data.table -> is.data.table -> [ -> [.data.table
Execution halted
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc
Version: 0.5.7
Check: tests
Result: ERROR
Running ‘testthat.R’ [50s/79s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(processmapR)
Attaching package: 'processmapR'
The following object is masked from 'package:stats':
frequency
>
> test_check("processmapR")
Saving _problems/test_dotted_chart-12.R
Saving _problems/test_dotted_chart-17.R
Saving _problems/test_dotted_chart-30.R
Saving _problems/test_dotted_chart-36.R
Saving _problems/test_dotted_chart-42.R
Saving _problems/test_dotted_chart-48.R
Saving _problems/test_dotted_chart-59.R
Saving _problems/test_dotted_chart-65.R
Saving _problems/test_dotted_chart-71.R
Saving _problems/test_dotted_chart-77.R
Saving _problems/test_dotted_chart-83.R
Saving _problems/test_dotted_chart-89.R
Saving _problems/test_dotted_chart-100.R
Saving _problems/test_dotted_chart-106.R
Saving _problems/test_dotted_chart-112.R
Saving _problems/test_dotted_chart-130.R
Saving _problems/test_dotted_chart-136.R
Saving _problems/test_dotted_chart-142.R
Saving _problems/test_dotted_chart-148.R
Saving _problems/test_dotted_chart-154.R
Saving _problems/test_dotted_chart-160.R
Saving _problems/test_dotted_chart-171.R
Saving _problems/test_dotted_chart-177.R
Saving _problems/test_dotted_chart-188.R
Saving _problems/test_dotted_chart-190.R
Saving _problems/test_dotted_chart-209.R
Saving _problems/test_dotted_chart-214.R
Saving _problems/test_dotted_chart-230.R
Saving _problems/test_dotted_chart-235.R
Saving _problems/test_dotted_chart-248.R
Saving _problems/test_dotted_chart-253.R
Saving _problems/test_dotted_chart_helpers-87.R
[ FAIL 32 | WARN 0 | SKIP 11 | PASS 70 ]
══ Skipped tests (11) ══════════════════════════════════════════════════════════
• On CRAN (7): 'test_dotted_chart.R:92:1', 'test_lined_chart.R:68:1',
'test_trace_explorer.R:4:1', 'test_trace_explorer.R:18:1',
'test_trace_explorer.R:50:1', 'test_trace_explorer.R:86:1',
'test_trace_explorer.R:246:1'
• depends on timezone (3): 'test_dotted_chart_helpers.R:5:3',
'test_dotted_chart_helpers.R:12:3', 'test_dotted_chart_helpers.R:71:3'
• depends on timezones (1): 'test_dotted_chart_helpers.R:31:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test_dotted_chart.R:8:2'): test dotted_chart on eventlog with default params ──
Expected `chart <- patients %>% dotted_chart()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:8:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart()
8. ├─processmapR::dotted_chart(.)
9. ├─processmapR:::dotted_chart.eventlog(.)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Error ('test_dotted_chart.R:13:2'): test dotted_chart on eventlog with default params ──
Error in ``[.data.table`(., , `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case)`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(patients %>% dotted_chart(), NA) at test_dotted_chart.R:13:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart()
8. ├─processmapR::dotted_chart(.)
9. ├─processmapR:::dotted_chart.eventlog(.)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:26:2'): test dotted_chart on eventlog with param `x` ──
Expected `patients %>% dotted_chart(x = "absolute")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:26:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "absolute")
8. ├─processmapR::dotted_chart(., x = "absolute")
9. ├─processmapR:::dotted_chart.eventlog(., x = "absolute")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:32:2'): test dotted_chart on eventlog with param `x` ──
Expected `patients %>% dotted_chart(x = "relative")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:32:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative")
8. ├─processmapR::dotted_chart(., x = "relative")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:38:2'): test dotted_chart on eventlog with param `x` ──
Expected `patients %>% dotted_chart(x = "relative_week")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:38:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative_week")
8. ├─processmapR::dotted_chart(., x = "relative_week")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative_week")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:44:2'): test dotted_chart on eventlog with param `x` ──
Expected `patients %>% dotted_chart(x = "relative_day")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:44:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative_day")
8. ├─processmapR::dotted_chart(., x = "relative_day")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative_day")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:55:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "auto")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:55:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "auto")
8. ├─processmapR::dotted_chart(., sort = "auto")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "auto")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:61:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "start")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:61:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "start")
8. ├─processmapR::dotted_chart(., sort = "start")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "start")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:67:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "end")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:67:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "end")
8. ├─processmapR::dotted_chart(., sort = "end")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "end")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:73:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "duration")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:73:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "duration")
8. ├─processmapR::dotted_chart(., sort = "duration")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "duration")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:79:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "start_week")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:79:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "start_week")
8. ├─processmapR::dotted_chart(., sort = "start_week")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "start_week")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:85:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "start_day")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:85:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "start_day")
8. ├─processmapR::dotted_chart(., sort = "start_day")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "start_day")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:96:2'): test dotted_chart on eventlog with param `color` ──
Expected `patients %>% dotted_chart(color = NULL)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:96:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(color = NULL)
8. ├─processmapR::dotted_chart(., color = NULL)
9. ├─processmapR:::dotted_chart.eventlog(., color = NULL)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:102:2'): test dotted_chart on eventlog with param `color` ──
Expected `patients %>% dotted_chart(color = NA)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:102:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(color = NA)
8. ├─processmapR::dotted_chart(., color = NA)
9. ├─processmapR:::dotted_chart.eventlog(., color = NA)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:108:2'): test dotted_chart on eventlog with param `color` ──
Expected `patients %>% dotted_chart(color = resource_id(.))` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:108:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(color = resource_id(.))
8. ├─processmapR::dotted_chart(., color = resource_id(.))
9. ├─processmapR:::dotted_chart.eventlog(., color = resource_id(.))
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:126:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "auto")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:126:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "auto")
8. ├─processmapR::dotted_chart(., x = "relative", units = "auto")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "auto")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:132:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "secs")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:132:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "secs")
8. ├─processmapR::dotted_chart(., x = "relative", units = "secs")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "secs")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:138:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "mins")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:138:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "mins")
8. ├─processmapR::dotted_chart(., x = "relative", units = "mins")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "mins")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:144:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "hours")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:144:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "hours")
8. ├─processmapR::dotted_chart(., x = "relative", units = "hours")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "hours")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:150:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "days")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:150:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "days")
8. ├─processmapR::dotted_chart(., x = "relative", units = "days")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "days")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:156:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "weeks")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:156:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "weeks")
8. ├─processmapR::dotted_chart(., x = "relative", units = "weeks")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "weeks")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:167:2'): test dotted_chart on eventlog with param `add_end_events` ──
Expected `patients %>% dotted_chart(add_end_events = FALSE)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:167:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(add_end_events = FALSE)
8. ├─processmapR::dotted_chart(., add_end_events = FALSE)
9. ├─processmapR:::dotted_chart.eventlog(., add_end_events = FALSE)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:173:2'): test dotted_chart on eventlog with param `add_end_events` ──
Expected `patients %>% dotted_chart(add_end_events = TRUE)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:173:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(add_end_events = TRUE)
8. ├─processmapR::dotted_chart(., add_end_events = TRUE)
9. ├─processmapR:::dotted_chart.eventlog(., add_end_events = TRUE)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:184:2'): test dotted_chart on eventlog with param `plotly` ──
Expected `chart <- patients %>% dotted_chart(plotly = FALSE)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:184:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(plotly = FALSE)
8. ├─processmapR::dotted_chart(., plotly = FALSE)
9. ├─processmapR:::dotted_chart.eventlog(., plotly = FALSE)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Error ('test_dotted_chart.R:190:2'): test dotted_chart on eventlog with param `plotly` ──
Error in `eval(code, test_env)`: object 'chart' not found
Backtrace:
▆
1. └─testthat::expect_s3_class(chart, "ggplot") at test_dotted_chart.R:190:9
2. └─testthat::quasi_label(enquo(object))
3. └─rlang::eval_bare(expr, quo_get_env(quo))
── Failure ('test_dotted_chart.R:205:2'): test dotted_chart on grouped_eventlog with default params ──
Expected `chart <- patients_grouped_resource %>% dotted_chart()` not to throw any errors.
Actually got a <dplyr:::mutate_error> with message:
i In argument: `data = map(data, fun, ...)`.
Caused by error in `map()`:
i In index: 1.
Caused by error in `[.data.table`:
! attempt access index 6/6 in VECTOR_ELT
── Error ('test_dotted_chart.R:210:2'): test dotted_chart on grouped_eventlog with default params ──
<dplyr:::mutate_error/rlang_error/error/condition>
Error in `mutate(., data = map(data, fun, ...))`: i In argument: `data = map(data, fun, ...)`.
Caused by error in `map()`:
i In index: 1.
Caused by error in `[.data.table`:
! attempt access index 6/6 in VECTOR_ELT
── Failure ('test_dotted_chart.R:226:2'): test dotted_chart on activitylog with default params ──
Expected `chart <- patients_act %>% dotted_chart()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:226:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients_act %>% dotted_chart()
8. ├─processmapR::dotted_chart(.)
9. ├─processmapR:::dotted_chart.activitylog(.)
10. │ └─processmapR:::dotted_chart.eventlog(...)
11. │ └─log %>% dotted_chart_data(color, units) %>% ...
12. ├─processmapR:::dotted_chart_plot(...)
13. │ └─dplyr::groups(data)
14. ├─processmapR:::dotted_chart_data(., color, units)
15. │ └─... %>% ...
16. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
17. │ └─dplyr:::manip_if(...)
18. │ └─dplyr:::tbl_if_syms(...)
19. │ ├─rlang::syms(...)
20. │ │ └─rlang:::map(x, sym)
21. │ │ └─base::lapply(.x, .f, ...)
22. │ └─dplyr:::tbl_if_vars(...)
23. │ └─dplyr::tbl_vars(.tbl)
24. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
25. │ │ └─base::structure(...)
26. │ └─dplyr:::tbl_vars_dispatch(x)
27. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
28. │ └─data.table::is.data.table(data)
29. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
30. └─data.table:::`[.data.table`(...)
── Error ('test_dotted_chart.R:231:2'): test dotted_chart on activitylog with default params ──
Error in ``[.data.table`(., , `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case)`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(patients_act %>% dotted_chart(), NA) at test_dotted_chart.R:231:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients_act %>% dotted_chart()
8. ├─processmapR::dotted_chart(.)
9. ├─processmapR:::dotted_chart.activitylog(.)
10. │ └─processmapR:::dotted_chart.eventlog(...)
11. │ └─log %>% dotted_chart_data(color, units) %>% ...
12. ├─processmapR:::dotted_chart_plot(...)
13. │ └─dplyr::groups(data)
14. ├─processmapR:::dotted_chart_data(., color, units)
15. │ └─... %>% ...
16. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
17. │ └─dplyr:::manip_if(...)
18. │ └─dplyr:::tbl_if_syms(...)
19. │ ├─rlang::syms(...)
20. │ │ └─rlang:::map(x, sym)
21. │ │ └─base::lapply(.x, .f, ...)
22. │ └─dplyr:::tbl_if_vars(...)
23. │ └─dplyr::tbl_vars(.tbl)
24. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
25. │ │ └─base::structure(...)
26. │ └─dplyr:::tbl_vars_dispatch(x)
27. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
28. │ └─data.table::is.data.table(data)
29. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
30. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:244:2'): test dotted_chart on grouped_activitylog with default params ──
Expected `chart <- patients_act_grouped_resource %>% dotted_chart()` not to throw any errors.
Actually got a <dplyr:::mutate_error> with message:
i In argument: `data = map(data, fun, ...)`.
Caused by error in `map()`:
i In index: 1.
Caused by error in `[.data.table`:
! attempt access index 6/6 in VECTOR_ELT
── Error ('test_dotted_chart.R:249:2'): test dotted_chart on grouped_activitylog with default params ──
<dplyr:::mutate_error/rlang_error/error/condition>
Error in `mutate(., data = map(data, fun, ...))`: i In argument: `data = map(data, fun, ...)`.
Caused by error in `map()`:
i In index: 1.
Caused by error in `[.data.table`:
! attempt access index 6/6 in VECTOR_ELT
── Error ('test_dotted_chart_helpers.R:87:3'): test dotted_chart_data dimensions, columns, and content ──
Error in ``[.data.table`(., , `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case)`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─processmapR:::dotted_chart_data(patients, NULL, "mins") at test_dotted_chart_helpers.R:87:3
2. │ └─... %>% ...
3. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
4. │ └─dplyr:::manip_if(...)
5. │ └─dplyr:::tbl_if_syms(...)
6. │ ├─rlang::syms(...)
7. │ │ └─rlang:::map(x, sym)
8. │ │ └─base::lapply(.x, .f, ...)
9. │ └─dplyr:::tbl_if_vars(...)
10. │ └─dplyr::tbl_vars(.tbl)
11. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
12. │ │ └─base::structure(...)
13. │ └─dplyr:::tbl_vars_dispatch(x)
14. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
15. │ └─data.table::is.data.table(data)
16. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
17. └─data.table:::`[.data.table`(...)
[ FAIL 32 | WARN 0 | SKIP 11 | PASS 70 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-fedora-clang
Version: 0.5.7
Check: tests
Result: ERROR
Running ‘testthat.R’ [44s/84s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(processmapR)
Attaching package: 'processmapR'
The following object is masked from 'package:stats':
frequency
>
> test_check("processmapR")
Saving _problems/test_dotted_chart-12.R
Saving _problems/test_dotted_chart-17.R
Saving _problems/test_dotted_chart-30.R
Saving _problems/test_dotted_chart-36.R
Saving _problems/test_dotted_chart-42.R
Saving _problems/test_dotted_chart-48.R
Saving _problems/test_dotted_chart-59.R
Saving _problems/test_dotted_chart-65.R
Saving _problems/test_dotted_chart-71.R
Saving _problems/test_dotted_chart-77.R
Saving _problems/test_dotted_chart-83.R
Saving _problems/test_dotted_chart-89.R
Saving _problems/test_dotted_chart-100.R
Saving _problems/test_dotted_chart-106.R
Saving _problems/test_dotted_chart-112.R
Saving _problems/test_dotted_chart-130.R
Saving _problems/test_dotted_chart-136.R
Saving _problems/test_dotted_chart-142.R
Saving _problems/test_dotted_chart-148.R
Saving _problems/test_dotted_chart-154.R
Saving _problems/test_dotted_chart-160.R
Saving _problems/test_dotted_chart-171.R
Saving _problems/test_dotted_chart-177.R
Saving _problems/test_dotted_chart-188.R
Saving _problems/test_dotted_chart-190.R
Saving _problems/test_dotted_chart-209.R
Saving _problems/test_dotted_chart-214.R
Saving _problems/test_dotted_chart-230.R
Saving _problems/test_dotted_chart-235.R
Saving _problems/test_dotted_chart-248.R
Saving _problems/test_dotted_chart-253.R
Saving _problems/test_dotted_chart_helpers-87.R
[ FAIL 32 | WARN 0 | SKIP 11 | PASS 70 ]
══ Skipped tests (11) ══════════════════════════════════════════════════════════
• On CRAN (7): 'test_dotted_chart.R:92:1', 'test_lined_chart.R:68:1',
'test_trace_explorer.R:4:1', 'test_trace_explorer.R:18:1',
'test_trace_explorer.R:50:1', 'test_trace_explorer.R:86:1',
'test_trace_explorer.R:246:1'
• depends on timezone (3): 'test_dotted_chart_helpers.R:5:3',
'test_dotted_chart_helpers.R:12:3', 'test_dotted_chart_helpers.R:71:3'
• depends on timezones (1): 'test_dotted_chart_helpers.R:31:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test_dotted_chart.R:8:2'): test dotted_chart on eventlog with default params ──
Expected `chart <- patients %>% dotted_chart()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:8:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart()
8. ├─processmapR::dotted_chart(.)
9. ├─processmapR:::dotted_chart.eventlog(.)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Error ('test_dotted_chart.R:13:2'): test dotted_chart on eventlog with default params ──
Error in ``[.data.table`(., , `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case)`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(patients %>% dotted_chart(), NA) at test_dotted_chart.R:13:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart()
8. ├─processmapR::dotted_chart(.)
9. ├─processmapR:::dotted_chart.eventlog(.)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:26:2'): test dotted_chart on eventlog with param `x` ──
Expected `patients %>% dotted_chart(x = "absolute")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:26:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "absolute")
8. ├─processmapR::dotted_chart(., x = "absolute")
9. ├─processmapR:::dotted_chart.eventlog(., x = "absolute")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:32:2'): test dotted_chart on eventlog with param `x` ──
Expected `patients %>% dotted_chart(x = "relative")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:32:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative")
8. ├─processmapR::dotted_chart(., x = "relative")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:38:2'): test dotted_chart on eventlog with param `x` ──
Expected `patients %>% dotted_chart(x = "relative_week")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:38:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative_week")
8. ├─processmapR::dotted_chart(., x = "relative_week")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative_week")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:44:2'): test dotted_chart on eventlog with param `x` ──
Expected `patients %>% dotted_chart(x = "relative_day")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:44:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative_day")
8. ├─processmapR::dotted_chart(., x = "relative_day")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative_day")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:55:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "auto")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:55:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "auto")
8. ├─processmapR::dotted_chart(., sort = "auto")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "auto")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:61:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "start")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:61:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "start")
8. ├─processmapR::dotted_chart(., sort = "start")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "start")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:67:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "end")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:67:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "end")
8. ├─processmapR::dotted_chart(., sort = "end")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "end")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:73:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "duration")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:73:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "duration")
8. ├─processmapR::dotted_chart(., sort = "duration")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "duration")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:79:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "start_week")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:79:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "start_week")
8. ├─processmapR::dotted_chart(., sort = "start_week")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "start_week")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:85:2'): test dotted_chart on eventlog with param `sort` ──
Expected `patients %>% dotted_chart(sort = "start_day")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:85:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(sort = "start_day")
8. ├─processmapR::dotted_chart(., sort = "start_day")
9. ├─processmapR:::dotted_chart.eventlog(., sort = "start_day")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:96:2'): test dotted_chart on eventlog with param `color` ──
Expected `patients %>% dotted_chart(color = NULL)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:96:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(color = NULL)
8. ├─processmapR::dotted_chart(., color = NULL)
9. ├─processmapR:::dotted_chart.eventlog(., color = NULL)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:102:2'): test dotted_chart on eventlog with param `color` ──
Expected `patients %>% dotted_chart(color = NA)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:102:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(color = NA)
8. ├─processmapR::dotted_chart(., color = NA)
9. ├─processmapR:::dotted_chart.eventlog(., color = NA)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:108:2'): test dotted_chart on eventlog with param `color` ──
Expected `patients %>% dotted_chart(color = resource_id(.))` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:108:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(color = resource_id(.))
8. ├─processmapR::dotted_chart(., color = resource_id(.))
9. ├─processmapR:::dotted_chart.eventlog(., color = resource_id(.))
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:126:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "auto")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:126:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "auto")
8. ├─processmapR::dotted_chart(., x = "relative", units = "auto")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "auto")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:132:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "secs")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:132:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "secs")
8. ├─processmapR::dotted_chart(., x = "relative", units = "secs")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "secs")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:138:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "mins")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:138:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "mins")
8. ├─processmapR::dotted_chart(., x = "relative", units = "mins")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "mins")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:144:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "hours")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:144:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "hours")
8. ├─processmapR::dotted_chart(., x = "relative", units = "hours")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "hours")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:150:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "days")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:150:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "days")
8. ├─processmapR::dotted_chart(., x = "relative", units = "days")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "days")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:156:2'): test dotted_chart on eventlog with param `units` ──
Expected `patients %>% dotted_chart(x = "relative", units = "weeks")` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:156:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(x = "relative", units = "weeks")
8. ├─processmapR::dotted_chart(., x = "relative", units = "weeks")
9. ├─processmapR:::dotted_chart.eventlog(., x = "relative", units = "weeks")
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:167:2'): test dotted_chart on eventlog with param `add_end_events` ──
Expected `patients %>% dotted_chart(add_end_events = FALSE)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:167:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(add_end_events = FALSE)
8. ├─processmapR::dotted_chart(., add_end_events = FALSE)
9. ├─processmapR:::dotted_chart.eventlog(., add_end_events = FALSE)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:173:2'): test dotted_chart on eventlog with param `add_end_events` ──
Expected `patients %>% dotted_chart(add_end_events = TRUE)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:173:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(add_end_events = TRUE)
8. ├─processmapR::dotted_chart(., add_end_events = TRUE)
9. ├─processmapR:::dotted_chart.eventlog(., add_end_events = TRUE)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:184:2'): test dotted_chart on eventlog with param `plotly` ──
Expected `chart <- patients %>% dotted_chart(plotly = FALSE)` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:184:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients %>% dotted_chart(plotly = FALSE)
8. ├─processmapR::dotted_chart(., plotly = FALSE)
9. ├─processmapR:::dotted_chart.eventlog(., plotly = FALSE)
10. │ └─log %>% dotted_chart_data(color, units) %>% ...
11. ├─processmapR:::dotted_chart_plot(...)
12. │ └─dplyr::groups(data)
13. ├─processmapR:::dotted_chart_data(., color, units)
14. │ └─... %>% ...
15. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
16. │ └─dplyr:::manip_if(...)
17. │ └─dplyr:::tbl_if_syms(...)
18. │ ├─rlang::syms(...)
19. │ │ └─rlang:::map(x, sym)
20. │ │ └─base::lapply(.x, .f, ...)
21. │ └─dplyr:::tbl_if_vars(...)
22. │ └─dplyr::tbl_vars(.tbl)
23. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
24. │ │ └─base::structure(...)
25. │ └─dplyr:::tbl_vars_dispatch(x)
26. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
27. │ └─data.table::is.data.table(data)
28. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
29. └─data.table:::`[.data.table`(...)
── Error ('test_dotted_chart.R:190:2'): test dotted_chart on eventlog with param `plotly` ──
Error in `eval(code, test_env)`: object 'chart' not found
Backtrace:
▆
1. └─testthat::expect_s3_class(chart, "ggplot") at test_dotted_chart.R:190:9
2. └─testthat::quasi_label(enquo(object))
3. └─rlang::eval_bare(expr, quo_get_env(quo))
── Failure ('test_dotted_chart.R:205:2'): test dotted_chart on grouped_eventlog with default params ──
Expected `chart <- patients_grouped_resource %>% dotted_chart()` not to throw any errors.
Actually got a <dplyr:::mutate_error> with message:
i In argument: `data = map(data, fun, ...)`.
Caused by error in `map()`:
i In index: 1.
Caused by error in `[.data.table`:
! attempt access index 6/6 in VECTOR_ELT
── Error ('test_dotted_chart.R:210:2'): test dotted_chart on grouped_eventlog with default params ──
<dplyr:::mutate_error/rlang_error/error/condition>
Error in `mutate(., data = map(data, fun, ...))`: i In argument: `data = map(data, fun, ...)`.
Caused by error in `map()`:
i In index: 1.
Caused by error in `[.data.table`:
! attempt access index 6/6 in VECTOR_ELT
── Failure ('test_dotted_chart.R:226:2'): test dotted_chart on activitylog with default params ──
Expected `chart <- patients_act %>% dotted_chart()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_dotted_chart.R:226:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients_act %>% dotted_chart()
8. ├─processmapR::dotted_chart(.)
9. ├─processmapR:::dotted_chart.activitylog(.)
10. │ └─processmapR:::dotted_chart.eventlog(...)
11. │ └─log %>% dotted_chart_data(color, units) %>% ...
12. ├─processmapR:::dotted_chart_plot(...)
13. │ └─dplyr::groups(data)
14. ├─processmapR:::dotted_chart_data(., color, units)
15. │ └─... %>% ...
16. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
17. │ └─dplyr:::manip_if(...)
18. │ └─dplyr:::tbl_if_syms(...)
19. │ ├─rlang::syms(...)
20. │ │ └─rlang:::map(x, sym)
21. │ │ └─base::lapply(.x, .f, ...)
22. │ └─dplyr:::tbl_if_vars(...)
23. │ └─dplyr::tbl_vars(.tbl)
24. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
25. │ │ └─base::structure(...)
26. │ └─dplyr:::tbl_vars_dispatch(x)
27. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
28. │ └─data.table::is.data.table(data)
29. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
30. └─data.table:::`[.data.table`(...)
── Error ('test_dotted_chart.R:231:2'): test dotted_chart on activitylog with default params ──
Error in ``[.data.table`(., , `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case)`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(patients_act %>% dotted_chart(), NA) at test_dotted_chart.R:231:9
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─patients_act %>% dotted_chart()
8. ├─processmapR::dotted_chart(.)
9. ├─processmapR:::dotted_chart.activitylog(.)
10. │ └─processmapR:::dotted_chart.eventlog(...)
11. │ └─log %>% dotted_chart_data(color, units) %>% ...
12. ├─processmapR:::dotted_chart_plot(...)
13. │ └─dplyr::groups(data)
14. ├─processmapR:::dotted_chart_data(., color, units)
15. │ └─... %>% ...
16. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
17. │ └─dplyr:::manip_if(...)
18. │ └─dplyr:::tbl_if_syms(...)
19. │ ├─rlang::syms(...)
20. │ │ └─rlang:::map(x, sym)
21. │ │ └─base::lapply(.x, .f, ...)
22. │ └─dplyr:::tbl_if_vars(...)
23. │ └─dplyr::tbl_vars(.tbl)
24. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
25. │ │ └─base::structure(...)
26. │ └─dplyr:::tbl_vars_dispatch(x)
27. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
28. │ └─data.table::is.data.table(data)
29. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
30. └─data.table:::`[.data.table`(...)
── Failure ('test_dotted_chart.R:244:2'): test dotted_chart on grouped_activitylog with default params ──
Expected `chart <- patients_act_grouped_resource %>% dotted_chart()` not to throw any errors.
Actually got a <dplyr:::mutate_error> with message:
i In argument: `data = map(data, fun, ...)`.
Caused by error in `map()`:
i In index: 1.
Caused by error in `[.data.table`:
! attempt access index 6/6 in VECTOR_ELT
── Error ('test_dotted_chart.R:249:2'): test dotted_chart on grouped_activitylog with default params ──
<dplyr:::mutate_error/rlang_error/error/condition>
Error in `mutate(., data = map(data, fun, ...))`: i In argument: `data = map(data, fun, ...)`.
Caused by error in `map()`:
i In index: 1.
Caused by error in `[.data.table`:
! attempt access index 6/6 in VECTOR_ELT
── Error ('test_dotted_chart_helpers.R:87:3'): test dotted_chart_data dimensions, columns, and content ──
Error in ``[.data.table`(., , `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case)`: attempt access index 6/6 in VECTOR_ELT
Backtrace:
▆
1. ├─processmapR:::dotted_chart_data(patients, NULL, "mins") at test_dotted_chart_helpers.R:87:3
2. │ └─... %>% ...
3. ├─dplyr::arrange_if(., str_detect(names(.), "ACTIVITY_RANKED_AS_"))
4. │ └─dplyr:::manip_if(...)
5. │ └─dplyr:::tbl_if_syms(...)
6. │ ├─rlang::syms(...)
7. │ │ └─rlang:::map(x, sym)
8. │ │ └─base::lapply(.x, .f, ...)
9. │ └─dplyr:::tbl_if_vars(...)
10. │ └─dplyr::tbl_vars(.tbl)
11. │ ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
12. │ │ └─base::structure(...)
13. │ └─dplyr:::tbl_vars_dispatch(x)
14. ├─data.table::dcast.data.table(., case ~ rank, value.var = "start")
15. │ └─data.table::is.data.table(data)
16. ├─.[, `:=`(rank, paste0("ACTIVITY_RANKED_AS_", 1:.N)), by = case]
17. └─data.table:::`[.data.table`(...)
[ FAIL 32 | WARN 0 | SKIP 11 | PASS 70 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc