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