Last updated on 2025-12-21 11:50:31 CET.
| Package | ERROR | NOTE | OK |
|---|---|---|---|
| bpmnR | 13 | ||
| bupaverse | 13 | ||
| eventdataR | 2 | 11 | |
| petrinetR | 13 | ||
| processcheckR | 9 | 4 | |
| processmapR | 4 | 5 | 4 |
| processmonitR | 5 | 8 | |
| processpredictR | 4 | 9 | |
| psmineR | 4 | 9 | |
| understandBPMN | 13 | ||
| xesreadR | 3 | 10 |
Current CRAN status: OK: 13
Current CRAN status: OK: 13
Current CRAN status: NOTE: 2, OK: 11
Version: 0.3.1
Check: CRAN incoming feasibility
Result: NOTE
Maintainer: ‘Gert Janssenswillen <gert.janssenswillen@uhasselt.be>’
The BugReports field in DESCRIPTION has
https://github.com/bupaverse/eventdataR/
which should likely be
https://github.com/bupaverse/eventdataR/issues
instead.
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc
Current CRAN status: NOTE: 13
Version: 0.3.0
Check: Rd files
Result: NOTE
checkRd: (-1) read_PN.Rd:15: Lost braces
15 | A code{\link{marked_petrinet}}
| ^
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-macos-arm64, r-release-macos-x86_64, r-release-windows-x86_64, r-oldrel-macos-arm64, r-oldrel-macos-x86_64, r-oldrel-windows-x86_64
Current CRAN status: NOTE: 9, OK: 4
Version: 0.1.5
Check: dependencies in R code
Result: NOTE
Unexported objects imported by ':::' calls:
‘bupaR:::allowed_lifecycles’ ‘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
Current CRAN status: ERROR: 4, NOTE: 5, OK: 4
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/23s]
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
Current CRAN status: NOTE: 5, OK: 8
Version: 0.1.0
Check: CRAN incoming feasibility
Result: NOTE
Maintainer: ‘gert.janssenswillen@uhasselt.be <gert.janssenswillen@uhasselt.be>’
No Authors@R field in DESCRIPTION.
Please add one, modifying
Authors@R: c(person(given = "Gert",
family = "Janssenswillen",
role = "aut"),
person(family = "gert.janssenswillen@uhasselt.be",
role = "cre",
email = "gert.janssenswillen@uhasselt.be"))
as necessary.
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc
Version: 0.1.0
Check: LazyData
Result: NOTE
'LazyData' is specified without a 'data' directory
Flavors: r-oldrel-macos-arm64, r-oldrel-macos-x86_64, r-oldrel-windows-x86_64
Current CRAN status: ERROR: 4, OK: 9
Version: 0.1.1
Check: examples
Result: ERROR
Running examples in ‘processpredictR-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: max_case_length
> ### Title: Calculate the maximum length of a case / number of activities in
> ### the longest trace in an event log
> ### Aliases: max_case_length
>
> ### ** Examples
>
> library(processpredictR)
> library(eventdataR)
>
> df <- prepare_examples(patients)
Error in `[.data.table`(log, order(start_time, end_time, min_order), `:=`(c("ith_case", :
attempt access index 7/7 in VECTOR_ELT
Calls: prepare_examples ... prepare_examples.eventlog -> %>% -> prepare_examples_main -> [ -> [.data.table
Execution halted
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc
Version: 0.1.1
Check: re-building of vignette outputs
Result: ERROR
Error(s) in re-building vignettes:
...
--- re-building ‘process-prediction-workflow.Rmd’ using rmarkdown
Quitting from process-prediction-workflow.Rmd:65-68 [unnamed-chunk-3]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
<error/rlang_error>
Error in `[.data.table`:
! attempt access index 7/7 in VECTOR_ELT
---
Backtrace:
▆
1. ├─processpredictR::prepare_examples(traffic_fines, task = "outcome")
2. ├─processpredictR:::prepare_examples.eventlog(traffic_fines, task = "outcome")
3. │ └─... %>% ...
4. └─processpredictR:::prepare_examples_main(...)
5. ├─...[]
6. └─data.table:::`[.data.table`(...)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Error: processing vignette 'process-prediction-workflow.Rmd' failed with diagnostics:
attempt access index 7/7 in VECTOR_ELT
--- failed re-building ‘process-prediction-workflow.Rmd’
SUMMARY: processing the following file failed:
‘process-prediction-workflow.Rmd’
Error: Vignette re-building failed.
Execution halted
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc
Version: 0.1.1
Check: examples
Result: ERROR
Running examples in ‘processpredictR-Ex.R’ failed
The error most likely occurred in:
> ### Name: max_case_length
> ### Title: Calculate the maximum length of a case / number of activities in
> ### the longest trace in an event log
> ### Aliases: max_case_length
>
> ### ** Examples
>
> library(processpredictR)
> library(eventdataR)
>
> df <- prepare_examples(patients)
Error in `[.data.table`(log, order(start_time, end_time, min_order), `:=`(c("ith_case", :
attempt access index 7/7 in VECTOR_ELT
Calls: prepare_examples ... prepare_examples.eventlog -> %>% -> prepare_examples_main -> [ -> [.data.table
Execution halted
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc
Version: 0.1.1
Check: re-building of vignette outputs
Result: ERROR
Error(s) in re-building vignettes:
--- re-building ‘process-prediction-workflow.Rmd’ using rmarkdown
Quitting from process-prediction-workflow.Rmd:65-68 [unnamed-chunk-3]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
<error/rlang_error>
Error in `[.data.table`:
! attempt access index 7/7 in VECTOR_ELT
---
Backtrace:
▆
1. ├─processpredictR::prepare_examples(traffic_fines, task = "outcome")
2. ├─processpredictR:::prepare_examples.eventlog(traffic_fines, task = "outcome")
3. │ └─... %>% ...
4. └─processpredictR:::prepare_examples_main(...)
5. ├─...[]
6. └─data.table:::`[.data.table`(...)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Error: processing vignette 'process-prediction-workflow.Rmd' failed with diagnostics:
attempt access index 7/7 in VECTOR_ELT
--- failed re-building ‘process-prediction-workflow.Rmd’
SUMMARY: processing the following file failed:
‘process-prediction-workflow.Rmd’
Error: Vignette re-building failed.
Execution halted
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc
Current CRAN status: ERROR: 4, OK: 9
Version: 0.1.1
Check: examples
Result: ERROR
Running examples in ‘psmineR-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: ps_aggregated
> ### Title: Aggregated Performance Spectrum
> ### Aliases: ps_aggregated ps_aggregated.log ps_aggregated.grouped_log
>
> ### ** Examples
>
> library(psmineR)
> library(eventdataR)
>
> sepsis %>%
+ ps_aggregated(segment_coverage = 0.2,
+ classification = "quartile",
+ grouping = "start",
+ bins = 15)
Error in `[.data.table`(dt, , `:=`((classification), fcase(delta <= quantile(delta, :
attempt access index 9/9 in VECTOR_ELT
Calls: %>% ... filter_segments -> build_classifier -> [ -> [.data.table
Execution halted
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc
Version: 0.1.1
Check: tests
Result: ERROR
Running ‘testthat.R’ [9s/9s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/tests.html
> # * https://testthat.r-lib.org/reference/test_package.html#special-files
>
> library(testthat)
> library(psmineR)
>
> test_check("psmineR")
Saving _problems/test_ps_aggregated-13.R
Saving _problems/test_ps_aggregated-14.R
Saving _problems/test_ps_aggregated-160.R
Saving _problems/test_ps_aggregated-161.R
Saving _problems/test_ps_aggregated-174.R
Saving _problems/test_ps_aggregated-176.R
Saving _problems/test_ps_detailed-13.R
Saving _problems/test_ps_detailed-18.R
Saving _problems/test_ps_detailed-141.R
Saving _problems/test_ps_detailed-146.R
Saving _problems/test_ps_detailed-160.R
Saving _problems/test_ps_detailed-166.R
[ FAIL 12 | WARN 2 | SKIP 8 | PASS 6 ]
══ Skipped tests (8) ═══════════════════════════════════════════════════════════
• On CRAN (8): 'test_ps_aggregated.R:70:1', 'test_ps_aggregated.R:90:1',
'test_ps_aggregated.R:110:1', 'test_ps_aggregated.R:120:1',
'test_ps_detailed.R:46:1', 'test_ps_detailed.R:71:1',
'test_ps_detailed.R:91:1', 'test_ps_detailed.R:101:1'
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test_ps_aggregated.R:9:3'): test ps_aggregated on eventlog ────────
Expected `ps <- patients %>% ps_aggregated()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(ps <- patients %>% ps_aggregated(), NA) at test_ps_aggregated.R:9:3
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 %>% ps_aggregated()
8. ├─psmineR::ps_aggregated(.)
9. ├─psmineR:::ps_aggregated.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Error ('test_ps_aggregated.R:14:3'): test ps_aggregated on eventlog ─────────
Error in `eval(code, test_env)`: object 'ps' not found
Backtrace:
▆
1. └─testthat::expect_s3_class(ps, "ggplot") at test_ps_aggregated.R:14:3
2. └─testthat::quasi_label(enquo(object))
3. └─rlang::eval_bare(expr, quo_get_env(quo))
── Failure ('test_ps_aggregated.R:156:3'): test ps_aggregated on activitylog ───
Expected `ps <- patients_act %>% ps_aggregated()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_ps_aggregated.R:156:3
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 %>% ps_aggregated()
8. ├─psmineR::ps_aggregated(.)
9. ├─psmineR:::ps_aggregated.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Error ('test_ps_aggregated.R:161:3'): test ps_aggregated on activitylog ─────
Error in `eval(code, test_env)`: object 'ps' not found
Backtrace:
▆
1. └─testthat::expect_s3_class(ps, "ggplot") at test_ps_aggregated.R:161:3
2. └─testthat::quasi_label(enquo(object))
3. └─rlang::eval_bare(expr, quo_get_env(quo))
── Failure ('test_ps_aggregated.R:169:3'): test ps_aggregated on grouped_activitylog ──
Expected `ps <- patients_act %>% group_by_resource() %>% ps_aggregated()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 8/8 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_ps_aggregated.R:169:3
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 %>% group_by_resource() %>% ps_aggregated()
8. ├─psmineR::ps_aggregated(.)
9. ├─psmineR:::ps_aggregated.grouped_log(.)
10. │ └─psmineR:::ps_aggregated.log(...)
11. │ └─psmineR:::get_segments(...)
12. │ └─... %>% order_segments(log)
13. ├─psmineR:::order_segments(., log)
14. │ └─data.table::setorderv(dt, cols = "start_t")
15. │ └─base::is.data.frame(x)
16. ├─psmineR:::filter_segments(...)
17. ├─psmineR:::build_classifier(., classification)
18. └─psmineR:::construct_segments(., classification)
19. └─psmineR:::construct_segments.activitylog(...)
20. ├─...[]
21. └─data.table:::`[.data.table`(...)
── Error ('test_ps_aggregated.R:176:3'): test ps_aggregated on grouped_activitylog ──
Error in `eval(code, test_env)`: object 'ps' not found
Backtrace:
▆
1. └─testthat::expect_s3_class(ps, "ggplot") at test_ps_aggregated.R:176:3
2. └─testthat::quasi_label(enquo(object))
3. └─rlang::eval_bare(expr, quo_get_env(quo))
── Failure ('test_ps_detailed.R:9:3'): test ps_detailed on eventlog ────────────
Expected `ps <- patients %>% ps_detailed()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(ps <- patients %>% ps_detailed(), NA) at test_ps_detailed.R:9:3
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 %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Error ('test_ps_detailed.R:14:3'): test ps_detailed on eventlog ─────────────
Error in ``[.data.table`(dt, , `:=`((classification), fcase(delta <= quantile(delta, 0.25), 1L, delta <= quantile(delta, 0.5), 2L, delta <= quantile(delta, 0.75), 3L, default = 4L)), by = "segment")`: attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(ps <- patients %>% ps_detailed(), NA) at test_ps_detailed.R:14:3
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 %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Failure ('test_ps_detailed.R:137:3'): test ps_detailed on activitylog ───────
Expected `ps <- patients_act %>% ps_detailed()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_ps_detailed.R:137:3
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 %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Error ('test_ps_detailed.R:142:3'): test ps_detailed on activitylog ─────────
Error in ``[.data.table`(dt, , `:=`((classification), fcase(delta <= quantile(delta, 0.25), 1L, delta <= quantile(delta, 0.5), 2L, delta <= quantile(delta, 0.75), 3L, default = 4L)), by = "segment")`: attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_ps_detailed.R:142:3
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 %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Failure ('test_ps_detailed.R:155:3'): test ps_detailed on grouped_activitylog ──
Expected `ps <- patients_act %>% group_by_resource() %>% ps_detailed()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 8/8 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_ps_detailed.R:155:3
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 %>% group_by_resource() %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.grouped_log(.)
10. │ └─psmineR:::ps_detailed.log(...)
11. │ └─psmineR:::get_segments(...)
12. │ └─... %>% order_segments(log)
13. ├─psmineR:::order_segments(., log)
14. │ └─data.table::setorderv(dt, cols = "start_t")
15. │ └─base::is.data.frame(x)
16. ├─psmineR:::filter_segments(...)
17. ├─psmineR:::build_classifier(., classification)
18. └─psmineR:::construct_segments(., classification)
19. └─psmineR:::construct_segments.activitylog(...)
20. ├─...[]
21. └─data.table:::`[.data.table`(...)
── Error ('test_ps_detailed.R:161:3'): test ps_detailed on grouped_activitylog ──
Error in ``[.data.table`(dt, , `:=`(start_t = do.call(pmin, c(na.rm = TRUE, .SD)), end_t = do.call(pmax, c(na.rm = TRUE, .SD))), .SDcols = TIMESTAMP_CLASSIFIERS, by = c(case_id(log), activity_id(log), "ACTIVITY_INSTANCE", classification))`: attempt access index 8/8 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_ps_detailed.R:161:3
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 %>% group_by_resource() %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.grouped_log(.)
10. │ └─psmineR:::ps_detailed.log(...)
11. │ └─psmineR:::get_segments(...)
12. │ └─... %>% order_segments(log)
13. ├─psmineR:::order_segments(., log)
14. │ └─data.table::setorderv(dt, cols = "start_t")
15. │ └─base::is.data.frame(x)
16. ├─psmineR:::filter_segments(...)
17. ├─psmineR:::build_classifier(., classification)
18. └─psmineR:::construct_segments(., classification)
19. └─psmineR:::construct_segments.activitylog(...)
20. ├─...[]
21. └─data.table:::`[.data.table`(...)
[ FAIL 12 | WARN 2 | SKIP 8 | PASS 6 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-debian-clang
Version: 0.1.1
Check: re-building of vignette outputs
Result: ERROR
Error(s) in re-building vignettes:
...
--- re-building ‘introduction_to_psmineR.Rmd’ using rmarkdown
Quitting from introduction_to_psmineR.Rmd:30-33 [unnamed-chunk-2]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
<error/rlang_error>
Error in `[.data.table`:
! attempt access index 9/9 in VECTOR_ELT
---
Backtrace:
▆
1. ├─traffic_fines %>% ps_detailed()
2. ├─psmineR::ps_detailed(.)
3. ├─psmineR:::ps_detailed.log(.)
4. │ └─psmineR:::get_segments(...)
5. │ └─... %>% order_segments(log)
6. ├─psmineR:::order_segments(., log)
7. │ └─data.table::setorderv(dt, cols = "start_t")
8. │ └─base::is.data.frame(x)
9. ├─psmineR:::filter_segments(...)
10. └─psmineR:::build_classifier(., classification)
11. ├─...[]
12. └─data.table:::`[.data.table`(...)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Error: processing vignette 'introduction_to_psmineR.Rmd' failed with diagnostics:
attempt access index 9/9 in VECTOR_ELT
--- failed re-building ‘introduction_to_psmineR.Rmd’
SUMMARY: processing the following file failed:
‘introduction_to_psmineR.Rmd’
Error: Vignette re-building failed.
Execution halted
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc
Version: 0.1.1
Check: tests
Result: ERROR
Running ‘testthat.R’ [5s/7s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/tests.html
> # * https://testthat.r-lib.org/reference/test_package.html#special-files
>
> library(testthat)
> library(psmineR)
>
> test_check("psmineR")
Saving _problems/test_ps_aggregated-13.R
Saving _problems/test_ps_aggregated-14.R
Saving _problems/test_ps_aggregated-160.R
Saving _problems/test_ps_aggregated-161.R
Saving _problems/test_ps_aggregated-174.R
Saving _problems/test_ps_aggregated-176.R
Saving _problems/test_ps_detailed-13.R
Saving _problems/test_ps_detailed-18.R
Saving _problems/test_ps_detailed-141.R
Saving _problems/test_ps_detailed-146.R
Saving _problems/test_ps_detailed-160.R
Saving _problems/test_ps_detailed-166.R
[ FAIL 12 | WARN 2 | SKIP 8 | PASS 6 ]
══ Skipped tests (8) ═══════════════════════════════════════════════════════════
• On CRAN (8): 'test_ps_aggregated.R:70:1', 'test_ps_aggregated.R:90:1',
'test_ps_aggregated.R:110:1', 'test_ps_aggregated.R:120:1',
'test_ps_detailed.R:46:1', 'test_ps_detailed.R:71:1',
'test_ps_detailed.R:91:1', 'test_ps_detailed.R:101:1'
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test_ps_aggregated.R:9:3'): test ps_aggregated on eventlog ────────
Expected `ps <- patients %>% ps_aggregated()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(ps <- patients %>% ps_aggregated(), NA) at test_ps_aggregated.R:9:3
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 %>% ps_aggregated()
8. ├─psmineR::ps_aggregated(.)
9. ├─psmineR:::ps_aggregated.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Error ('test_ps_aggregated.R:14:3'): test ps_aggregated on eventlog ─────────
Error in `eval(code, test_env)`: object 'ps' not found
Backtrace:
▆
1. └─testthat::expect_s3_class(ps, "ggplot") at test_ps_aggregated.R:14:3
2. └─testthat::quasi_label(enquo(object))
3. └─rlang::eval_bare(expr, quo_get_env(quo))
── Failure ('test_ps_aggregated.R:156:3'): test ps_aggregated on activitylog ───
Expected `ps <- patients_act %>% ps_aggregated()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_ps_aggregated.R:156:3
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 %>% ps_aggregated()
8. ├─psmineR::ps_aggregated(.)
9. ├─psmineR:::ps_aggregated.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Error ('test_ps_aggregated.R:161:3'): test ps_aggregated on activitylog ─────
Error in `eval(code, test_env)`: object 'ps' not found
Backtrace:
▆
1. └─testthat::expect_s3_class(ps, "ggplot") at test_ps_aggregated.R:161:3
2. └─testthat::quasi_label(enquo(object))
3. └─rlang::eval_bare(expr, quo_get_env(quo))
── Failure ('test_ps_aggregated.R:169:3'): test ps_aggregated on grouped_activitylog ──
Expected `ps <- patients_act %>% group_by_resource() %>% ps_aggregated()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 8/8 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_ps_aggregated.R:169:3
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 %>% group_by_resource() %>% ps_aggregated()
8. ├─psmineR::ps_aggregated(.)
9. ├─psmineR:::ps_aggregated.grouped_log(.)
10. │ └─psmineR:::ps_aggregated.log(...)
11. │ └─psmineR:::get_segments(...)
12. │ └─... %>% order_segments(log)
13. ├─psmineR:::order_segments(., log)
14. │ └─data.table::setorderv(dt, cols = "start_t")
15. │ └─base::is.data.frame(x)
16. ├─psmineR:::filter_segments(...)
17. ├─psmineR:::build_classifier(., classification)
18. └─psmineR:::construct_segments(., classification)
19. └─psmineR:::construct_segments.activitylog(...)
20. ├─...[]
21. └─data.table:::`[.data.table`(...)
── Error ('test_ps_aggregated.R:176:3'): test ps_aggregated on grouped_activitylog ──
Error in `eval(code, test_env)`: object 'ps' not found
Backtrace:
▆
1. └─testthat::expect_s3_class(ps, "ggplot") at test_ps_aggregated.R:176:3
2. └─testthat::quasi_label(enquo(object))
3. └─rlang::eval_bare(expr, quo_get_env(quo))
── Failure ('test_ps_detailed.R:9:3'): test ps_detailed on eventlog ────────────
Expected `ps <- patients %>% ps_detailed()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(ps <- patients %>% ps_detailed(), NA) at test_ps_detailed.R:9:3
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 %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Error ('test_ps_detailed.R:14:3'): test ps_detailed on eventlog ─────────────
Error in ``[.data.table`(dt, , `:=`((classification), fcase(delta <= quantile(delta, 0.25), 1L, delta <= quantile(delta, 0.5), 2L, delta <= quantile(delta, 0.75), 3L, default = 4L)), by = "segment")`: attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(ps <- patients %>% ps_detailed(), NA) at test_ps_detailed.R:14:3
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 %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Failure ('test_ps_detailed.R:137:3'): test ps_detailed on activitylog ───────
Expected `ps <- patients_act %>% ps_detailed()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_ps_detailed.R:137:3
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 %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Error ('test_ps_detailed.R:142:3'): test ps_detailed on activitylog ─────────
Error in ``[.data.table`(dt, , `:=`((classification), fcase(delta <= quantile(delta, 0.25), 1L, delta <= quantile(delta, 0.5), 2L, delta <= quantile(delta, 0.75), 3L, default = 4L)), by = "segment")`: attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_ps_detailed.R:142:3
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 %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Failure ('test_ps_detailed.R:155:3'): test ps_detailed on grouped_activitylog ──
Expected `ps <- patients_act %>% group_by_resource() %>% ps_detailed()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 8/8 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_ps_detailed.R:155:3
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 %>% group_by_resource() %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.grouped_log(.)
10. │ └─psmineR:::ps_detailed.log(...)
11. │ └─psmineR:::get_segments(...)
12. │ └─... %>% order_segments(log)
13. ├─psmineR:::order_segments(., log)
14. │ └─data.table::setorderv(dt, cols = "start_t")
15. │ └─base::is.data.frame(x)
16. ├─psmineR:::filter_segments(...)
17. ├─psmineR:::build_classifier(., classification)
18. └─psmineR:::construct_segments(., classification)
19. └─psmineR:::construct_segments.activitylog(...)
20. ├─...[]
21. └─data.table:::`[.data.table`(...)
── Error ('test_ps_detailed.R:161:3'): test ps_detailed on grouped_activitylog ──
Error in ``[.data.table`(dt, , `:=`(start_t = do.call(pmin, c(na.rm = TRUE, .SD)), end_t = do.call(pmax, c(na.rm = TRUE, .SD))), .SDcols = TIMESTAMP_CLASSIFIERS, by = c(case_id(log), activity_id(log), "ACTIVITY_INSTANCE", classification))`: attempt access index 8/8 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_ps_detailed.R:161:3
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 %>% group_by_resource() %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.grouped_log(.)
10. │ └─psmineR:::ps_detailed.log(...)
11. │ └─psmineR:::get_segments(...)
12. │ └─... %>% order_segments(log)
13. ├─psmineR:::order_segments(., log)
14. │ └─data.table::setorderv(dt, cols = "start_t")
15. │ └─base::is.data.frame(x)
16. ├─psmineR:::filter_segments(...)
17. ├─psmineR:::build_classifier(., classification)
18. └─psmineR:::construct_segments(., classification)
19. └─psmineR:::construct_segments.activitylog(...)
20. ├─...[]
21. └─data.table:::`[.data.table`(...)
[ FAIL 12 | WARN 2 | SKIP 8 | PASS 6 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 0.1.1
Check: examples
Result: ERROR
Running examples in ‘psmineR-Ex.R’ failed
The error most likely occurred in:
> ### Name: ps_aggregated
> ### Title: Aggregated Performance Spectrum
> ### Aliases: ps_aggregated ps_aggregated.log ps_aggregated.grouped_log
>
> ### ** Examples
>
> library(psmineR)
> library(eventdataR)
>
> sepsis %>%
+ ps_aggregated(segment_coverage = 0.2,
+ classification = "quartile",
+ grouping = "start",
+ bins = 15)
Error in `[.data.table`(dt, , `:=`((classification), fcase(delta <= quantile(delta, :
attempt access index 9/9 in VECTOR_ELT
Calls: %>% ... filter_segments -> build_classifier -> [ -> [.data.table
Execution halted
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc
Version: 0.1.1
Check: tests
Result: ERROR
Running ‘testthat.R’ [12s/22s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/tests.html
> # * https://testthat.r-lib.org/reference/test_package.html#special-files
>
> library(testthat)
> library(psmineR)
>
> test_check("psmineR")
Saving _problems/test_ps_aggregated-13.R
Saving _problems/test_ps_aggregated-14.R
Saving _problems/test_ps_aggregated-160.R
Saving _problems/test_ps_aggregated-161.R
Saving _problems/test_ps_aggregated-174.R
Saving _problems/test_ps_aggregated-176.R
Saving _problems/test_ps_detailed-13.R
Saving _problems/test_ps_detailed-18.R
Saving _problems/test_ps_detailed-141.R
Saving _problems/test_ps_detailed-146.R
Saving _problems/test_ps_detailed-160.R
Saving _problems/test_ps_detailed-166.R
[ FAIL 12 | WARN 2 | SKIP 8 | PASS 6 ]
══ Skipped tests (8) ═══════════════════════════════════════════════════════════
• On CRAN (8): 'test_ps_aggregated.R:70:1', 'test_ps_aggregated.R:90:1',
'test_ps_aggregated.R:110:1', 'test_ps_aggregated.R:120:1',
'test_ps_detailed.R:46:1', 'test_ps_detailed.R:71:1',
'test_ps_detailed.R:91:1', 'test_ps_detailed.R:101:1'
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test_ps_aggregated.R:9:3'): test ps_aggregated on eventlog ────────
Expected `ps <- patients %>% ps_aggregated()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(ps <- patients %>% ps_aggregated(), NA) at test_ps_aggregated.R:9:3
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 %>% ps_aggregated()
8. ├─psmineR::ps_aggregated(.)
9. ├─psmineR:::ps_aggregated.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Error ('test_ps_aggregated.R:14:3'): test ps_aggregated on eventlog ─────────
Error in `eval(code, test_env)`: object 'ps' not found
Backtrace:
▆
1. └─testthat::expect_s3_class(ps, "ggplot") at test_ps_aggregated.R:14:3
2. └─testthat::quasi_label(enquo(object))
3. └─rlang::eval_bare(expr, quo_get_env(quo))
── Failure ('test_ps_aggregated.R:156:3'): test ps_aggregated on activitylog ───
Expected `ps <- patients_act %>% ps_aggregated()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_ps_aggregated.R:156:3
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 %>% ps_aggregated()
8. ├─psmineR::ps_aggregated(.)
9. ├─psmineR:::ps_aggregated.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Error ('test_ps_aggregated.R:161:3'): test ps_aggregated on activitylog ─────
Error in `eval(code, test_env)`: object 'ps' not found
Backtrace:
▆
1. └─testthat::expect_s3_class(ps, "ggplot") at test_ps_aggregated.R:161:3
2. └─testthat::quasi_label(enquo(object))
3. └─rlang::eval_bare(expr, quo_get_env(quo))
── Failure ('test_ps_aggregated.R:169:3'): test ps_aggregated on grouped_activitylog ──
Expected `ps <- patients_act %>% group_by_resource() %>% ps_aggregated()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 8/8 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_ps_aggregated.R:169:3
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 %>% group_by_resource() %>% ps_aggregated()
8. ├─psmineR::ps_aggregated(.)
9. ├─psmineR:::ps_aggregated.grouped_log(.)
10. │ └─psmineR:::ps_aggregated.log(...)
11. │ └─psmineR:::get_segments(...)
12. │ └─... %>% order_segments(log)
13. ├─psmineR:::order_segments(., log)
14. │ └─data.table::setorderv(dt, cols = "start_t")
15. │ └─base::is.data.frame(x)
16. ├─psmineR:::filter_segments(...)
17. ├─psmineR:::build_classifier(., classification)
18. └─psmineR:::construct_segments(., classification)
19. └─psmineR:::construct_segments.activitylog(...)
20. ├─...[]
21. └─data.table:::`[.data.table`(...)
── Error ('test_ps_aggregated.R:176:3'): test ps_aggregated on grouped_activitylog ──
Error in `eval(code, test_env)`: object 'ps' not found
Backtrace:
▆
1. └─testthat::expect_s3_class(ps, "ggplot") at test_ps_aggregated.R:176:3
2. └─testthat::quasi_label(enquo(object))
3. └─rlang::eval_bare(expr, quo_get_env(quo))
── Failure ('test_ps_detailed.R:9:3'): test ps_detailed on eventlog ────────────
Expected `ps <- patients %>% ps_detailed()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(ps <- patients %>% ps_detailed(), NA) at test_ps_detailed.R:9:3
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 %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Error ('test_ps_detailed.R:14:3'): test ps_detailed on eventlog ─────────────
Error in ``[.data.table`(dt, , `:=`((classification), fcase(delta <= quantile(delta, 0.25), 1L, delta <= quantile(delta, 0.5), 2L, delta <= quantile(delta, 0.75), 3L, default = 4L)), by = "segment")`: attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(ps <- patients %>% ps_detailed(), NA) at test_ps_detailed.R:14:3
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 %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Failure ('test_ps_detailed.R:137:3'): test ps_detailed on activitylog ───────
Expected `ps <- patients_act %>% ps_detailed()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_ps_detailed.R:137:3
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 %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Error ('test_ps_detailed.R:142:3'): test ps_detailed on activitylog ─────────
Error in ``[.data.table`(dt, , `:=`((classification), fcase(delta <= quantile(delta, 0.25), 1L, delta <= quantile(delta, 0.5), 2L, delta <= quantile(delta, 0.75), 3L, default = 4L)), by = "segment")`: attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_ps_detailed.R:142:3
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 %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Failure ('test_ps_detailed.R:155:3'): test ps_detailed on grouped_activitylog ──
Expected `ps <- patients_act %>% group_by_resource() %>% ps_detailed()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 8/8 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_ps_detailed.R:155:3
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 %>% group_by_resource() %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.grouped_log(.)
10. │ └─psmineR:::ps_detailed.log(...)
11. │ └─psmineR:::get_segments(...)
12. │ └─... %>% order_segments(log)
13. ├─psmineR:::order_segments(., log)
14. │ └─data.table::setorderv(dt, cols = "start_t")
15. │ └─base::is.data.frame(x)
16. ├─psmineR:::filter_segments(...)
17. ├─psmineR:::build_classifier(., classification)
18. └─psmineR:::construct_segments(., classification)
19. └─psmineR:::construct_segments.activitylog(...)
20. ├─...[]
21. └─data.table:::`[.data.table`(...)
── Error ('test_ps_detailed.R:161:3'): test ps_detailed on grouped_activitylog ──
Error in ``[.data.table`(dt, , `:=`(start_t = do.call(pmin, c(na.rm = TRUE, .SD)), end_t = do.call(pmax, c(na.rm = TRUE, .SD))), .SDcols = TIMESTAMP_CLASSIFIERS, by = c(case_id(log), activity_id(log), "ACTIVITY_INSTANCE", classification))`: attempt access index 8/8 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_ps_detailed.R:161:3
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 %>% group_by_resource() %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.grouped_log(.)
10. │ └─psmineR:::ps_detailed.log(...)
11. │ └─psmineR:::get_segments(...)
12. │ └─... %>% order_segments(log)
13. ├─psmineR:::order_segments(., log)
14. │ └─data.table::setorderv(dt, cols = "start_t")
15. │ └─base::is.data.frame(x)
16. ├─psmineR:::filter_segments(...)
17. ├─psmineR:::build_classifier(., classification)
18. └─psmineR:::construct_segments(., classification)
19. └─psmineR:::construct_segments.activitylog(...)
20. ├─...[]
21. └─data.table:::`[.data.table`(...)
[ FAIL 12 | WARN 2 | SKIP 8 | PASS 6 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-fedora-clang
Version: 0.1.1
Check: re-building of vignette outputs
Result: ERROR
Error(s) in re-building vignettes:
--- re-building ‘introduction_to_psmineR.Rmd’ using rmarkdown
Quitting from introduction_to_psmineR.Rmd:30-33 [unnamed-chunk-2]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
<error/rlang_error>
Error in `[.data.table`:
! attempt access index 9/9 in VECTOR_ELT
---
Backtrace:
▆
1. ├─traffic_fines %>% ps_detailed()
2. ├─psmineR::ps_detailed(.)
3. ├─psmineR:::ps_detailed.log(.)
4. │ └─psmineR:::get_segments(...)
5. │ └─... %>% order_segments(log)
6. ├─psmineR:::order_segments(., log)
7. │ └─data.table::setorderv(dt, cols = "start_t")
8. │ └─base::is.data.frame(x)
9. ├─psmineR:::filter_segments(...)
10. └─psmineR:::build_classifier(., classification)
11. ├─...[]
12. └─data.table:::`[.data.table`(...)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Error: processing vignette 'introduction_to_psmineR.Rmd' failed with diagnostics:
attempt access index 9/9 in VECTOR_ELT
--- failed re-building ‘introduction_to_psmineR.Rmd’
SUMMARY: processing the following file failed:
‘introduction_to_psmineR.Rmd’
Error: Vignette re-building failed.
Execution halted
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc
Version: 0.1.1
Check: tests
Result: ERROR
Running ‘testthat.R’ [11s/21s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/tests.html
> # * https://testthat.r-lib.org/reference/test_package.html#special-files
>
> library(testthat)
> library(psmineR)
>
> test_check("psmineR")
Saving _problems/test_ps_aggregated-13.R
Saving _problems/test_ps_aggregated-14.R
Saving _problems/test_ps_aggregated-160.R
Saving _problems/test_ps_aggregated-161.R
Saving _problems/test_ps_aggregated-174.R
Saving _problems/test_ps_aggregated-176.R
Saving _problems/test_ps_detailed-13.R
Saving _problems/test_ps_detailed-18.R
Saving _problems/test_ps_detailed-141.R
Saving _problems/test_ps_detailed-146.R
Saving _problems/test_ps_detailed-160.R
Saving _problems/test_ps_detailed-166.R
[ FAIL 12 | WARN 2 | SKIP 8 | PASS 6 ]
══ Skipped tests (8) ═══════════════════════════════════════════════════════════
• On CRAN (8): 'test_ps_aggregated.R:70:1', 'test_ps_aggregated.R:90:1',
'test_ps_aggregated.R:110:1', 'test_ps_aggregated.R:120:1',
'test_ps_detailed.R:46:1', 'test_ps_detailed.R:71:1',
'test_ps_detailed.R:91:1', 'test_ps_detailed.R:101:1'
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test_ps_aggregated.R:9:3'): test ps_aggregated on eventlog ────────
Expected `ps <- patients %>% ps_aggregated()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(ps <- patients %>% ps_aggregated(), NA) at test_ps_aggregated.R:9:3
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 %>% ps_aggregated()
8. ├─psmineR::ps_aggregated(.)
9. ├─psmineR:::ps_aggregated.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Error ('test_ps_aggregated.R:14:3'): test ps_aggregated on eventlog ─────────
Error in `eval(code, test_env)`: object 'ps' not found
Backtrace:
▆
1. └─testthat::expect_s3_class(ps, "ggplot") at test_ps_aggregated.R:14:3
2. └─testthat::quasi_label(enquo(object))
3. └─rlang::eval_bare(expr, quo_get_env(quo))
── Failure ('test_ps_aggregated.R:156:3'): test ps_aggregated on activitylog ───
Expected `ps <- patients_act %>% ps_aggregated()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_ps_aggregated.R:156:3
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 %>% ps_aggregated()
8. ├─psmineR::ps_aggregated(.)
9. ├─psmineR:::ps_aggregated.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Error ('test_ps_aggregated.R:161:3'): test ps_aggregated on activitylog ─────
Error in `eval(code, test_env)`: object 'ps' not found
Backtrace:
▆
1. └─testthat::expect_s3_class(ps, "ggplot") at test_ps_aggregated.R:161:3
2. └─testthat::quasi_label(enquo(object))
3. └─rlang::eval_bare(expr, quo_get_env(quo))
── Failure ('test_ps_aggregated.R:169:3'): test ps_aggregated on grouped_activitylog ──
Expected `ps <- patients_act %>% group_by_resource() %>% ps_aggregated()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 8/8 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_ps_aggregated.R:169:3
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 %>% group_by_resource() %>% ps_aggregated()
8. ├─psmineR::ps_aggregated(.)
9. ├─psmineR:::ps_aggregated.grouped_log(.)
10. │ └─psmineR:::ps_aggregated.log(...)
11. │ └─psmineR:::get_segments(...)
12. │ └─... %>% order_segments(log)
13. ├─psmineR:::order_segments(., log)
14. │ └─data.table::setorderv(dt, cols = "start_t")
15. │ └─base::is.data.frame(x)
16. ├─psmineR:::filter_segments(...)
17. ├─psmineR:::build_classifier(., classification)
18. └─psmineR:::construct_segments(., classification)
19. └─psmineR:::construct_segments.activitylog(...)
20. ├─...[]
21. └─data.table:::`[.data.table`(...)
── Error ('test_ps_aggregated.R:176:3'): test ps_aggregated on grouped_activitylog ──
Error in `eval(code, test_env)`: object 'ps' not found
Backtrace:
▆
1. └─testthat::expect_s3_class(ps, "ggplot") at test_ps_aggregated.R:176:3
2. └─testthat::quasi_label(enquo(object))
3. └─rlang::eval_bare(expr, quo_get_env(quo))
── Failure ('test_ps_detailed.R:9:3'): test ps_detailed on eventlog ────────────
Expected `ps <- patients %>% ps_detailed()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(ps <- patients %>% ps_detailed(), NA) at test_ps_detailed.R:9:3
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 %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Error ('test_ps_detailed.R:14:3'): test ps_detailed on eventlog ─────────────
Error in ``[.data.table`(dt, , `:=`((classification), fcase(delta <= quantile(delta, 0.25), 1L, delta <= quantile(delta, 0.5), 2L, delta <= quantile(delta, 0.75), 3L, default = 4L)), by = "segment")`: attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(ps <- patients %>% ps_detailed(), NA) at test_ps_detailed.R:14:3
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 %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Failure ('test_ps_detailed.R:137:3'): test ps_detailed on activitylog ───────
Expected `ps <- patients_act %>% ps_detailed()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_ps_detailed.R:137:3
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 %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Error ('test_ps_detailed.R:142:3'): test ps_detailed on activitylog ─────────
Error in ``[.data.table`(dt, , `:=`((classification), fcase(delta <= quantile(delta, 0.25), 1L, delta <= quantile(delta, 0.5), 2L, delta <= quantile(delta, 0.75), 3L, default = 4L)), by = "segment")`: attempt access index 9/9 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_ps_detailed.R:142:3
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 %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.log(.)
10. │ └─psmineR:::get_segments(...)
11. │ └─... %>% order_segments(log)
12. ├─psmineR:::order_segments(., log)
13. │ └─data.table::setorderv(dt, cols = "start_t")
14. │ └─base::is.data.frame(x)
15. ├─psmineR:::filter_segments(...)
16. └─psmineR:::build_classifier(., classification)
17. ├─...[]
18. └─data.table:::`[.data.table`(...)
── Failure ('test_ps_detailed.R:155:3'): test ps_detailed on grouped_activitylog ──
Expected `ps <- patients_act %>% group_by_resource() %>% ps_detailed()` not to throw any errors.
Actually got a <simpleError> with message:
attempt access index 8/8 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_ps_detailed.R:155:3
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 %>% group_by_resource() %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.grouped_log(.)
10. │ └─psmineR:::ps_detailed.log(...)
11. │ └─psmineR:::get_segments(...)
12. │ └─... %>% order_segments(log)
13. ├─psmineR:::order_segments(., log)
14. │ └─data.table::setorderv(dt, cols = "start_t")
15. │ └─base::is.data.frame(x)
16. ├─psmineR:::filter_segments(...)
17. ├─psmineR:::build_classifier(., classification)
18. └─psmineR:::construct_segments(., classification)
19. └─psmineR:::construct_segments.activitylog(...)
20. ├─...[]
21. └─data.table:::`[.data.table`(...)
── Error ('test_ps_detailed.R:161:3'): test ps_detailed on grouped_activitylog ──
Error in ``[.data.table`(dt, , `:=`(start_t = do.call(pmin, c(na.rm = TRUE, .SD)), end_t = do.call(pmax, c(na.rm = TRUE, .SD))), .SDcols = TIMESTAMP_CLASSIFIERS, by = c(case_id(log), activity_id(log), "ACTIVITY_INSTANCE", classification))`: attempt access index 8/8 in VECTOR_ELT
Backtrace:
▆
1. ├─testthat::expect_warning(...) at test_ps_detailed.R:161:3
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 %>% group_by_resource() %>% ps_detailed()
8. ├─psmineR::ps_detailed(.)
9. ├─psmineR:::ps_detailed.grouped_log(.)
10. │ └─psmineR:::ps_detailed.log(...)
11. │ └─psmineR:::get_segments(...)
12. │ └─... %>% order_segments(log)
13. ├─psmineR:::order_segments(., log)
14. │ └─data.table::setorderv(dt, cols = "start_t")
15. │ └─base::is.data.frame(x)
16. ├─psmineR:::filter_segments(...)
17. ├─psmineR:::build_classifier(., classification)
18. └─psmineR:::construct_segments(., classification)
19. └─psmineR:::construct_segments.activitylog(...)
20. ├─...[]
21. └─data.table:::`[.data.table`(...)
[ FAIL 12 | WARN 2 | SKIP 8 | PASS 6 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc
Current CRAN status: NOTE: 13
Version: 1.1.1
Check: package subdirectories
Result: NOTE
Problems with news in ‘NEWS.md’:
No news entries found.
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-macos-arm64, r-release-macos-x86_64, r-release-windows-x86_64, r-oldrel-macos-arm64, r-oldrel-macos-x86_64, r-oldrel-windows-x86_64
Version: 1.1.1
Check: LazyData
Result: NOTE
'LazyData' is specified without a 'data' directory
Flavors: r-oldrel-macos-arm64, r-oldrel-macos-x86_64, r-oldrel-windows-x86_64
Current CRAN status: NOTE: 3, OK: 10
Version: 0.2.3
Check: LazyData
Result: NOTE
'LazyData' is specified without a 'data' directory
Flavors: r-oldrel-macos-arm64, r-oldrel-macos-x86_64, r-oldrel-windows-x86_64