Running 'testthat.R' [38s]
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")
  [ FAIL 26 | WARN 53 | SKIP 5 | PASS 84 ]
  
  == Skipped tests ===============================================================
  * On CRAN (2)
  * depends on timezone (3)
  
  == Failed tests ================================================================
  -- Error ('test_trace_explorer.R:10:3'): test trace_explorer on eventlog with default params --
  Error in ``:=`("case_classifier", !!case_id_(log))`: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Backtrace:
       x
    1. +-testthat::expect_snapshot_warning(chart <- patients %>% trace_explorer()) at test_trace_explorer.R:10:2
    2. | \-testthat:::expect_snapshot_condition(...)
    3. |   \-testthat:::capture_matching_condition(x, cnd_matcher(class))
    4. |     \-base::withCallingHandlers(...)
    5. +-patients %>% trace_explorer()
    6. +-processmapR::trace_explorer(.)
    7. +-processmapR:::trace_explorer.eventlog(.)
    8. | \-... %>% ...
    9. +-dplyr::mutate(...)
   10. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   11. +-dplyr::mutate(...)
   12. +-dplyr::ungroup(.)
   13. +-dplyr::mutate(., rank_event = seq_len(n()))
   14. +-dplyr::arrange(., ts, min_order)
   15. +-dplyr::inner_join(., traces, by = "trace")
   16. +-dplyr::filter(., case_classifier == first(case_classifier))
   17. +-dplyr::group_by(., trace_id)
   18. +-dplyr::inner_join(., cases, by = "case_classifier")
   19. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   20. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   21. +-dplyr::arrange(., timestamp_classifier, .order)
   22. +-base::as.data.frame(.)
   23. +-dplyr::rename(...)
   24. +-bupaR:::rename.log(...)
   25. \-`:=`("case_classifier", !!case_id_(log))
  -- Failure ('test_trace_explorer.R:22:3'): test trace_explorer on eventlog with param `coverage` --
  `chart <- patients %>% trace_explorer(coverage = 0.2)` threw an unexpected error.
  Message: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test_trace_explorer.R:22:2
    2. | \-testthat:::expect_condition_matching(...)
    3. |   \-testthat:::quasi_capture(...)
    4. |     +-testthat (local) .capture(...)
    5. |     | \-base::withCallingHandlers(...)
    6. |     \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. +-patients %>% trace_explorer(coverage = 0.2)
    8. +-processmapR::trace_explorer(., coverage = 0.2)
    9. +-processmapR:::trace_explorer.eventlog(., coverage = 0.2)
   10. | \-... %>% ...
   11. +-dplyr::mutate(...)
   12. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   13. +-dplyr::mutate(...)
   14. +-dplyr::ungroup(.)
   15. +-dplyr::mutate(., rank_event = seq_len(n()))
   16. +-dplyr::arrange(., ts, min_order)
   17. +-dplyr::inner_join(., traces, by = "trace")
   18. +-dplyr::filter(., case_classifier == first(case_classifier))
   19. +-dplyr::group_by(., trace_id)
   20. +-dplyr::inner_join(., cases, by = "case_classifier")
   21. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   22. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   23. +-dplyr::arrange(., timestamp_classifier, .order)
   24. +-base::as.data.frame(.)
   25. +-dplyr::rename(...)
   26. +-bupaR:::rename.log(...)
   27. \-`:=`("case_classifier", !!case_id_(log))
  -- Error ('test_trace_explorer.R:27:3'): test trace_explorer on eventlog with param `coverage` --
  Error in ``:=`("case_classifier", !!case_id_(log))`: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Backtrace:
       x
    1. +-testthat::expect_warning(...) at test_trace_explorer.R:27:2
    2. | \-testthat:::expect_condition_matching(...)
    3. |   \-testthat:::quasi_capture(...)
    4. |     +-testthat (local) .capture(...)
    5. |     | \-base::withCallingHandlers(...)
    6. |     \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. +-patients %>% trace_explorer(coverage = 0.2)
    8. +-processmapR::trace_explorer(., coverage = 0.2)
    9. +-processmapR:::trace_explorer.eventlog(., coverage = 0.2)
   10. | \-... %>% ...
   11. +-dplyr::mutate(...)
   12. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   13. +-dplyr::mutate(...)
   14. +-dplyr::ungroup(.)
   15. +-dplyr::mutate(., rank_event = seq_len(n()))
   16. +-dplyr::arrange(., ts, min_order)
   17. +-dplyr::inner_join(., traces, by = "trace")
   18. +-dplyr::filter(., case_classifier == first(case_classifier))
   19. +-dplyr::group_by(., trace_id)
   20. +-dplyr::inner_join(., cases, by = "case_classifier")
   21. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   22. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   23. +-dplyr::arrange(., timestamp_classifier, .order)
   24. +-base::as.data.frame(.)
   25. +-dplyr::rename(...)
   26. +-bupaR:::rename.log(...)
   27. \-`:=`("case_classifier", !!case_id_(log))
  -- Failure ('test_trace_explorer.R:54:3'): test trace_explorer on eventlog with param `n_traces` --
  `chart <- patients %>% trace_explorer(n_traces = 1)` threw an unexpected error.
  Message: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test_trace_explorer.R:54:2
    2. | \-testthat:::expect_condition_matching(...)
    3. |   \-testthat:::quasi_capture(...)
    4. |     +-testthat (local) .capture(...)
    5. |     | \-base::withCallingHandlers(...)
    6. |     \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. +-patients %>% trace_explorer(n_traces = 1)
    8. +-processmapR::trace_explorer(., n_traces = 1)
    9. +-processmapR:::trace_explorer.eventlog(., n_traces = 1)
   10. | \-... %>% ...
   11. +-dplyr::mutate(...)
   12. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   13. +-dplyr::mutate(...)
   14. +-dplyr::ungroup(.)
   15. +-dplyr::mutate(., rank_event = seq_len(n()))
   16. +-dplyr::arrange(., ts, min_order)
   17. +-dplyr::inner_join(., traces, by = "trace")
   18. +-dplyr::filter(., case_classifier == first(case_classifier))
   19. +-dplyr::group_by(., trace_id)
   20. +-dplyr::inner_join(., cases, by = "case_classifier")
   21. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   22. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   23. +-dplyr::arrange(., timestamp_classifier, .order)
   24. +-base::as.data.frame(.)
   25. +-dplyr::rename(...)
   26. +-bupaR:::rename.log(...)
   27. \-`:=`("case_classifier", !!case_id_(log))
  -- Error ('test_trace_explorer.R:59:3'): test trace_explorer on eventlog with param `n_traces` --
  Error in ``:=`("case_classifier", !!case_id_(log))`: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Backtrace:
       x
    1. +-testthat::expect_warning(...) at test_trace_explorer.R:59:2
    2. | \-testthat:::expect_condition_matching(...)
    3. |   \-testthat:::quasi_capture(...)
    4. |     +-testthat (local) .capture(...)
    5. |     | \-base::withCallingHandlers(...)
    6. |     \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. +-patients %>% trace_explorer(n_traces = 1)
    8. +-processmapR::trace_explorer(., n_traces = 1)
    9. +-processmapR:::trace_explorer.eventlog(., n_traces = 1)
   10. | \-... %>% ...
   11. +-dplyr::mutate(...)
   12. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   13. +-dplyr::mutate(...)
   14. +-dplyr::ungroup(.)
   15. +-dplyr::mutate(., rank_event = seq_len(n()))
   16. +-dplyr::arrange(., ts, min_order)
   17. +-dplyr::inner_join(., traces, by = "trace")
   18. +-dplyr::filter(., case_classifier == first(case_classifier))
   19. +-dplyr::group_by(., trace_id)
   20. +-dplyr::inner_join(., cases, by = "case_classifier")
   21. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   22. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   23. +-dplyr::arrange(., timestamp_classifier, .order)
   24. +-base::as.data.frame(.)
   25. +-dplyr::rename(...)
   26. +-bupaR:::rename.log(...)
   27. \-`:=`("case_classifier", !!case_id_(log))
  -- Failure ('test_trace_explorer.R:90:3'): test trace_explorer on eventlog with param `type` --
  `chart <- patients %>% trace_explorer(coverage = 0.2, type = "frequent")` threw an unexpected error.
  Message: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test_trace_explorer.R:90:2
    2. | \-testthat:::expect_condition_matching(...)
    3. |   \-testthat:::quasi_capture(...)
    4. |     +-testthat (local) .capture(...)
    5. |     | \-base::withCallingHandlers(...)
    6. |     \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. +-patients %>% trace_explorer(coverage = 0.2, type = "frequent")
    8. +-processmapR::trace_explorer(., coverage = 0.2, type = "frequent")
    9. +-processmapR:::trace_explorer.eventlog(., coverage = 0.2, type = "frequent")
   10. | \-... %>% ...
   11. +-dplyr::mutate(...)
   12. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   13. +-dplyr::mutate(...)
   14. +-dplyr::ungroup(.)
   15. +-dplyr::mutate(., rank_event = seq_len(n()))
   16. +-dplyr::arrange(., ts, min_order)
   17. +-dplyr::inner_join(., traces, by = "trace")
   18. +-dplyr::filter(., case_classifier == first(case_classifier))
   19. +-dplyr::group_by(., trace_id)
   20. +-dplyr::inner_join(., cases, by = "case_classifier")
   21. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   22. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   23. +-dplyr::arrange(., timestamp_classifier, .order)
   24. +-base::as.data.frame(.)
   25. +-dplyr::rename(...)
   26. +-bupaR:::rename.log(...)
   27. \-`:=`("case_classifier", !!case_id_(log))
  -- Failure ('test_trace_explorer.R:96:3'): test trace_explorer on eventlog with param `type` --
  `patients %>% trace_explorer(coverage = 0.05, type = "infrequent")` threw an unexpected error.
  Message: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test_trace_explorer.R:96:2
    2. | \-testthat:::expect_condition_matching(...)
    3. |   \-testthat:::quasi_capture(...)
    4. |     +-testthat (local) .capture(...)
    5. |     | \-base::withCallingHandlers(...)
    6. |     \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. +-patients %>% trace_explorer(coverage = 0.05, type = "infrequent")
    8. +-processmapR::trace_explorer(., coverage = 0.05, type = "infrequent")
    9. +-processmapR:::trace_explorer.eventlog(., coverage = 0.05, type = "infrequent")
   10. | \-... %>% ...
   11. +-dplyr::mutate(...)
   12. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   13. +-dplyr::mutate(...)
   14. +-dplyr::ungroup(.)
   15. +-dplyr::mutate(., rank_event = seq_len(n()))
   16. +-dplyr::arrange(., ts, min_order)
   17. +-dplyr::inner_join(., traces, by = "trace")
   18. +-dplyr::filter(., case_classifier == first(case_classifier))
   19. +-dplyr::group_by(., trace_id)
   20. +-dplyr::inner_join(., cases, by = "case_classifier")
   21. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   22. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   23. +-dplyr::arrange(., timestamp_classifier, .order)
   24. +-base::as.data.frame(.)
   25. +-dplyr::rename(...)
   26. +-bupaR:::rename.log(...)
   27. \-`:=`("case_classifier", !!case_id_(log))
  -- Error ('test_trace_explorer.R:104:3'): test trace_explorer on eventlog with param `type` --
  Error in ``:=`("case_classifier", !!case_id_(log))`: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Backtrace:
       x
    1. +-testthat::expect_snapshot_warning(patients %>% trace_explorer(type = "frequent")) at test_trace_explorer.R:104:2
    2. | \-testthat:::expect_snapshot_condition(...)
    3. |   \-testthat:::capture_matching_condition(x, cnd_matcher(class))
    4. |     \-base::withCallingHandlers(...)
    5. +-patients %>% trace_explorer(type = "frequent")
    6. +-processmapR::trace_explorer(., type = "frequent")
    7. +-processmapR:::trace_explorer.eventlog(., type = "frequent")
    8. | \-... %>% ...
    9. +-dplyr::mutate(...)
   10. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   11. +-dplyr::mutate(...)
   12. +-dplyr::ungroup(.)
   13. +-dplyr::mutate(., rank_event = seq_len(n()))
   14. +-dplyr::arrange(., ts, min_order)
   15. +-dplyr::inner_join(., traces, by = "trace")
   16. +-dplyr::filter(., case_classifier == first(case_classifier))
   17. +-dplyr::group_by(., trace_id)
   18. +-dplyr::inner_join(., cases, by = "case_classifier")
   19. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   20. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   21. +-dplyr::arrange(., timestamp_classifier, .order)
   22. +-base::as.data.frame(.)
   23. +-dplyr::rename(...)
   24. +-bupaR:::rename.log(...)
   25. \-`:=`("case_classifier", !!case_id_(log))
  -- Failure ('test_trace_explorer.R:123:3'): test trace_explorer on eventlog with param `coverage_labels` --
  `chart <- patients %>% trace_explorer(coverage = 0.2, coverage_labels = "relative")` threw an unexpected error.
  Message: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test_trace_explorer.R:123:2
    2. | \-testthat:::expect_condition_matching(...)
    3. |   \-testthat:::quasi_capture(...)
    4. |     +-testthat (local) .capture(...)
    5. |     | \-base::withCallingHandlers(...)
    6. |     \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. +-patients %>% ...
    8. +-processmapR::trace_explorer(., coverage = 0.2, coverage_labels = "relative")
    9. +-processmapR:::trace_explorer.eventlog(., coverage = 0.2, coverage_labels = "relative")
   10. | \-... %>% ...
   11. +-dplyr::mutate(...)
   12. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   13. +-dplyr::mutate(...)
   14. +-dplyr::ungroup(.)
   15. +-dplyr::mutate(., rank_event = seq_len(n()))
   16. +-dplyr::arrange(., ts, min_order)
   17. +-dplyr::inner_join(., traces, by = "trace")
   18. +-dplyr::filter(., case_classifier == first(case_classifier))
   19. +-dplyr::group_by(., trace_id)
   20. +-dplyr::inner_join(., cases, by = "case_classifier")
   21. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   22. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   23. +-dplyr::arrange(., timestamp_classifier, .order)
   24. +-base::as.data.frame(.)
   25. +-dplyr::rename(...)
   26. +-bupaR:::rename.log(...)
   27. \-`:=`("case_classifier", !!case_id_(log))
  -- Failure ('test_trace_explorer.R:129:3'): test trace_explorer on eventlog with param `coverage_labels` --
  `patients %>% trace_explorer(coverage = 0.2, coverage_labels = "absolute")` threw an unexpected error.
  Message: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test_trace_explorer.R:129:2
    2. | \-testthat:::expect_condition_matching(...)
    3. |   \-testthat:::quasi_capture(...)
    4. |     +-testthat (local) .capture(...)
    5. |     | \-base::withCallingHandlers(...)
    6. |     \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. +-patients %>% ...
    8. +-processmapR::trace_explorer(., coverage = 0.2, coverage_labels = "absolute")
    9. +-processmapR:::trace_explorer.eventlog(., coverage = 0.2, coverage_labels = "absolute")
   10. | \-... %>% ...
   11. +-dplyr::mutate(...)
   12. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   13. +-dplyr::mutate(...)
   14. +-dplyr::ungroup(.)
   15. +-dplyr::mutate(., rank_event = seq_len(n()))
   16. +-dplyr::arrange(., ts, min_order)
   17. +-dplyr::inner_join(., traces, by = "trace")
   18. +-dplyr::filter(., case_classifier == first(case_classifier))
   19. +-dplyr::group_by(., trace_id)
   20. +-dplyr::inner_join(., cases, by = "case_classifier")
   21. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   22. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   23. +-dplyr::arrange(., timestamp_classifier, .order)
   24. +-base::as.data.frame(.)
   25. +-dplyr::rename(...)
   26. +-bupaR:::rename.log(...)
   27. \-`:=`("case_classifier", !!case_id_(log))
  -- Failure ('test_trace_explorer.R:135:3'): test trace_explorer on eventlog with param `coverage_labels` --
  `patients %>% trace_explorer(coverage = 0.2, coverage_labels = "cumulative")` threw an unexpected error.
  Message: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test_trace_explorer.R:135:2
    2. | \-testthat:::expect_condition_matching(...)
    3. |   \-testthat:::quasi_capture(...)
    4. |     +-testthat (local) .capture(...)
    5. |     | \-base::withCallingHandlers(...)
    6. |     \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. +-patients %>% ...
    8. +-processmapR::trace_explorer(., coverage = 0.2, coverage_labels = "cumulative")
    9. +-processmapR:::trace_explorer.eventlog(., coverage = 0.2, coverage_labels = "cumulative")
   10. | \-... %>% ...
   11. +-dplyr::mutate(...)
   12. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   13. +-dplyr::mutate(...)
   14. +-dplyr::ungroup(.)
   15. +-dplyr::mutate(., rank_event = seq_len(n()))
   16. +-dplyr::arrange(., ts, min_order)
   17. +-dplyr::inner_join(., traces, by = "trace")
   18. +-dplyr::filter(., case_classifier == first(case_classifier))
   19. +-dplyr::group_by(., trace_id)
   20. +-dplyr::inner_join(., cases, by = "case_classifier")
   21. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   22. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   23. +-dplyr::arrange(., timestamp_classifier, .order)
   24. +-base::as.data.frame(.)
   25. +-dplyr::rename(...)
   26. +-bupaR:::rename.log(...)
   27. \-`:=`("case_classifier", !!case_id_(log))
  -- Failure ('test_trace_explorer.R:141:3'): test trace_explorer on eventlog with param `coverage_labels` --
  ``%>%`(...)` threw an unexpected error.
  Message: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test_trace_explorer.R:141:2
    2. | \-testthat:::expect_condition_matching(...)
    3. |   \-testthat:::quasi_capture(...)
    4. |     +-testthat (local) .capture(...)
    5. |     | \-base::withCallingHandlers(...)
    6. |     \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. +-patients %>% ...
    8. +-processmapR::trace_explorer(...)
    9. +-processmapR:::trace_explorer.eventlog(...)
   10. | \-... %>% ...
   11. +-dplyr::mutate(...)
   12. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   13. +-dplyr::mutate(...)
   14. +-dplyr::ungroup(.)
   15. +-dplyr::mutate(., rank_event = seq_len(n()))
   16. +-dplyr::arrange(., ts, min_order)
   17. +-dplyr::inner_join(., traces, by = "trace")
   18. +-dplyr::filter(., case_classifier == first(case_classifier))
   19. +-dplyr::group_by(., trace_id)
   20. +-dplyr::inner_join(., cases, by = "case_classifier")
   21. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   22. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   23. +-dplyr::arrange(., timestamp_classifier, .order)
   24. +-base::as.data.frame(.)
   25. +-dplyr::rename(...)
   26. +-bupaR:::rename.log(...)
   27. \-`:=`("case_classifier", !!case_id_(log))
  -- Error ('test_trace_explorer.R:147:3'): test trace_explorer on eventlog with param `coverage_labels` --
  Error in `eval_bare(expr, quo_get_env(quo))`: object 'chart' not found
  Backtrace:
      x
   1. \-testthat::expect_s3_class(chart, "ggplot") at test_trace_explorer.R:147:2
   2.   \-testthat::quasi_label(enquo(object), arg = "object")
   3.     \-rlang::eval_bare(expr, quo_get_env(quo))
  -- Failure ('test_trace_explorer.R:154:3'): test trace_explorer on eventlog with param `abbreviate` --
  `chart <- patients %>% trace_explorer(coverage = 0.2, abbreviate = TRUE)` threw an unexpected error.
  Message: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test_trace_explorer.R:154:2
    2. | \-testthat:::expect_condition_matching(...)
    3. |   \-testthat:::quasi_capture(...)
    4. |     +-testthat (local) .capture(...)
    5. |     | \-base::withCallingHandlers(...)
    6. |     \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. +-patients %>% trace_explorer(coverage = 0.2, abbreviate = TRUE)
    8. +-processmapR::trace_explorer(., coverage = 0.2, abbreviate = TRUE)
    9. +-processmapR:::trace_explorer.eventlog(., coverage = 0.2, abbreviate = TRUE)
   10. | \-... %>% ...
   11. +-dplyr::mutate(...)
   12. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   13. +-dplyr::mutate(...)
   14. +-dplyr::ungroup(.)
   15. +-dplyr::mutate(., rank_event = seq_len(n()))
   16. +-dplyr::arrange(., ts, min_order)
   17. +-dplyr::inner_join(., traces, by = "trace")
   18. +-dplyr::filter(., case_classifier == first(case_classifier))
   19. +-dplyr::group_by(., trace_id)
   20. +-dplyr::inner_join(., cases, by = "case_classifier")
   21. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   22. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   23. +-dplyr::arrange(., timestamp_classifier, .order)
   24. +-base::as.data.frame(.)
   25. +-dplyr::rename(...)
   26. +-bupaR:::rename.log(...)
   27. \-`:=`("case_classifier", !!case_id_(log))
  -- Failure ('test_trace_explorer.R:160:3'): test trace_explorer on eventlog with param `abbreviate` --
  `patients %>% trace_explorer(coverage = 0.2, abbreviate = FALSE)` threw an unexpected error.
  Message: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test_trace_explorer.R:160:2
    2. | \-testthat:::expect_condition_matching(...)
    3. |   \-testthat:::quasi_capture(...)
    4. |     +-testthat (local) .capture(...)
    5. |     | \-base::withCallingHandlers(...)
    6. |     \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. +-patients %>% trace_explorer(coverage = 0.2, abbreviate = FALSE)
    8. +-processmapR::trace_explorer(., coverage = 0.2, abbreviate = FALSE)
    9. +-processmapR:::trace_explorer.eventlog(., coverage = 0.2, abbreviate = FALSE)
   10. | \-... %>% ...
   11. +-dplyr::mutate(...)
   12. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   13. +-dplyr::mutate(...)
   14. +-dplyr::ungroup(.)
   15. +-dplyr::mutate(., rank_event = seq_len(n()))
   16. +-dplyr::arrange(., ts, min_order)
   17. +-dplyr::inner_join(., traces, by = "trace")
   18. +-dplyr::filter(., case_classifier == first(case_classifier))
   19. +-dplyr::group_by(., trace_id)
   20. +-dplyr::inner_join(., cases, by = "case_classifier")
   21. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   22. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   23. +-dplyr::arrange(., timestamp_classifier, .order)
   24. +-base::as.data.frame(.)
   25. +-dplyr::rename(...)
   26. +-bupaR:::rename.log(...)
   27. \-`:=`("case_classifier", !!case_id_(log))
  -- Error ('test_trace_explorer.R:166:3'): test trace_explorer on eventlog with param `abbreviate` --
  Error in `eval_bare(expr, quo_get_env(quo))`: object 'chart' not found
  Backtrace:
      x
   1. \-testthat::expect_s3_class(chart, "ggplot") at test_trace_explorer.R:166:2
   2.   \-testthat::quasi_label(enquo(object), arg = "object")
   3.     \-rlang::eval_bare(expr, quo_get_env(quo))
  -- Failure ('test_trace_explorer.R:173:3'): test trace_explorer on eventlog with param `show_labels` --
  `chart <- patients %>% trace_explorer(coverage = 0.2, show_labels = TRUE)` threw an unexpected error.
  Message: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test_trace_explorer.R:173:2
    2. | \-testthat:::expect_condition_matching(...)
    3. |   \-testthat:::quasi_capture(...)
    4. |     +-testthat (local) .capture(...)
    5. |     | \-base::withCallingHandlers(...)
    6. |     \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. +-patients %>% trace_explorer(coverage = 0.2, show_labels = TRUE)
    8. +-processmapR::trace_explorer(., coverage = 0.2, show_labels = TRUE)
    9. +-processmapR:::trace_explorer.eventlog(., coverage = 0.2, show_labels = TRUE)
   10. | \-... %>% ...
   11. +-dplyr::mutate(...)
   12. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   13. +-dplyr::mutate(...)
   14. +-dplyr::ungroup(.)
   15. +-dplyr::mutate(., rank_event = seq_len(n()))
   16. +-dplyr::arrange(., ts, min_order)
   17. +-dplyr::inner_join(., traces, by = "trace")
   18. +-dplyr::filter(., case_classifier == first(case_classifier))
   19. +-dplyr::group_by(., trace_id)
   20. +-dplyr::inner_join(., cases, by = "case_classifier")
   21. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   22. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   23. +-dplyr::arrange(., timestamp_classifier, .order)
   24. +-base::as.data.frame(.)
   25. +-dplyr::rename(...)
   26. +-bupaR:::rename.log(...)
   27. \-`:=`("case_classifier", !!case_id_(log))
  -- Failure ('test_trace_explorer.R:179:3'): test trace_explorer on eventlog with param `show_labels` --
  `patients %>% trace_explorer(coverage = 0.2, show_labels = FALSE)` threw an unexpected error.
  Message: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test_trace_explorer.R:179:2
    2. | \-testthat:::expect_condition_matching(...)
    3. |   \-testthat:::quasi_capture(...)
    4. |     +-testthat (local) .capture(...)
    5. |     | \-base::withCallingHandlers(...)
    6. |     \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. +-patients %>% trace_explorer(coverage = 0.2, show_labels = FALSE)
    8. +-processmapR::trace_explorer(., coverage = 0.2, show_labels = FALSE)
    9. +-processmapR:::trace_explorer.eventlog(., coverage = 0.2, show_labels = FALSE)
   10. | \-... %>% ...
   11. +-dplyr::mutate(...)
   12. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   13. +-dplyr::mutate(...)
   14. +-dplyr::ungroup(.)
   15. +-dplyr::mutate(., rank_event = seq_len(n()))
   16. +-dplyr::arrange(., ts, min_order)
   17. +-dplyr::inner_join(., traces, by = "trace")
   18. +-dplyr::filter(., case_classifier == first(case_classifier))
   19. +-dplyr::group_by(., trace_id)
   20. +-dplyr::inner_join(., cases, by = "case_classifier")
   21. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   22. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   23. +-dplyr::arrange(., timestamp_classifier, .order)
   24. +-base::as.data.frame(.)
   25. +-dplyr::rename(...)
   26. +-bupaR:::rename.log(...)
   27. \-`:=`("case_classifier", !!case_id_(log))
  -- Error ('test_trace_explorer.R:185:3'): test trace_explorer on eventlog with param `show_labels` --
  Error in `eval_bare(expr, quo_get_env(quo))`: object 'chart' not found
  Backtrace:
      x
   1. \-testthat::expect_s3_class(chart, "ggplot") at test_trace_explorer.R:185:2
   2.   \-testthat::quasi_label(enquo(object), arg = "object")
   3.     \-rlang::eval_bare(expr, quo_get_env(quo))
  -- Failure ('test_trace_explorer.R:192:3'): test trace_explorer on eventlog with param `label_size` --
  `chart <- patients %>% trace_explorer(coverage = 0.2, label_size = 5)` threw an unexpected error.
  Message: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test_trace_explorer.R:192:2
    2. | \-testthat:::expect_condition_matching(...)
    3. |   \-testthat:::quasi_capture(...)
    4. |     +-testthat (local) .capture(...)
    5. |     | \-base::withCallingHandlers(...)
    6. |     \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. +-patients %>% trace_explorer(coverage = 0.2, label_size = 5)
    8. +-processmapR::trace_explorer(., coverage = 0.2, label_size = 5)
    9. +-processmapR:::trace_explorer.eventlog(., coverage = 0.2, label_size = 5)
   10. | \-... %>% ...
   11. +-dplyr::mutate(...)
   12. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   13. +-dplyr::mutate(...)
   14. +-dplyr::ungroup(.)
   15. +-dplyr::mutate(., rank_event = seq_len(n()))
   16. +-dplyr::arrange(., ts, min_order)
   17. +-dplyr::inner_join(., traces, by = "trace")
   18. +-dplyr::filter(., case_classifier == first(case_classifier))
   19. +-dplyr::group_by(., trace_id)
   20. +-dplyr::inner_join(., cases, by = "case_classifier")
   21. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   22. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   23. +-dplyr::arrange(., timestamp_classifier, .order)
   24. +-base::as.data.frame(.)
   25. +-dplyr::rename(...)
   26. +-bupaR:::rename.log(...)
   27. \-`:=`("case_classifier", !!case_id_(log))
  -- Error ('test_trace_explorer.R:198:3'): test trace_explorer on eventlog with param `label_size` --
  Error in `eval_bare(expr, quo_get_env(quo))`: object 'chart' not found
  Backtrace:
      x
   1. \-testthat::expect_s3_class(chart, "ggplot") at test_trace_explorer.R:198:2
   2.   \-testthat::quasi_label(enquo(object), arg = "object")
   3.     \-rlang::eval_bare(expr, quo_get_env(quo))
  -- Failure ('test_trace_explorer.R:205:3'): test trace_explorer on eventlog with param `raw_data` --
  `chart <- patients %>% trace_explorer(coverage = 0.2, raw_data = FALSE)` threw an unexpected error.
  Message: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test_trace_explorer.R:205:2
    2. | \-testthat:::expect_condition_matching(...)
    3. |   \-testthat:::quasi_capture(...)
    4. |     +-testthat (local) .capture(...)
    5. |     | \-base::withCallingHandlers(...)
    6. |     \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. +-patients %>% trace_explorer(coverage = 0.2, raw_data = FALSE)
    8. +-processmapR::trace_explorer(., coverage = 0.2, raw_data = FALSE)
    9. +-processmapR:::trace_explorer.eventlog(., coverage = 0.2, raw_data = FALSE)
   10. | \-... %>% ...
   11. +-dplyr::mutate(...)
   12. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   13. +-dplyr::mutate(...)
   14. +-dplyr::ungroup(.)
   15. +-dplyr::mutate(., rank_event = seq_len(n()))
   16. +-dplyr::arrange(., ts, min_order)
   17. +-dplyr::inner_join(., traces, by = "trace")
   18. +-dplyr::filter(., case_classifier == first(case_classifier))
   19. +-dplyr::group_by(., trace_id)
   20. +-dplyr::inner_join(., cases, by = "case_classifier")
   21. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   22. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   23. +-dplyr::arrange(., timestamp_classifier, .order)
   24. +-base::as.data.frame(.)
   25. +-dplyr::rename(...)
   26. +-bupaR:::rename.log(...)
   27. \-`:=`("case_classifier", !!case_id_(log))
  -- Error ('test_trace_explorer.R:211:3'): test trace_explorer on eventlog with param `raw_data` --
  Error in `eval_bare(expr, quo_get_env(quo))`: object 'chart' not found
  Backtrace:
      x
   1. \-testthat::expect_s3_class(chart, "ggplot") at test_trace_explorer.R:211:2
   2.   \-testthat::quasi_label(enquo(object), arg = "object")
   3.     \-rlang::eval_bare(expr, quo_get_env(quo))
  -- Failure ('test_trace_explorer.R:226:3'): test trace_explorer on eventlog with param `plotly` --
  `chart <- patients %>% trace_explorer(coverage = 0.2, plotly = FALSE)` threw an unexpected error.
  Message: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test_trace_explorer.R:226:2
    2. | \-testthat:::expect_condition_matching(...)
    3. |   \-testthat:::quasi_capture(...)
    4. |     +-testthat (local) .capture(...)
    5. |     | \-base::withCallingHandlers(...)
    6. |     \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. +-patients %>% trace_explorer(coverage = 0.2, plotly = FALSE)
    8. +-processmapR::trace_explorer(., coverage = 0.2, plotly = FALSE)
    9. +-processmapR:::trace_explorer.eventlog(., coverage = 0.2, plotly = FALSE)
   10. | \-... %>% ...
   11. +-dplyr::mutate(...)
   12. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   13. +-dplyr::mutate(...)
   14. +-dplyr::ungroup(.)
   15. +-dplyr::mutate(., rank_event = seq_len(n()))
   16. +-dplyr::arrange(., ts, min_order)
   17. +-dplyr::inner_join(., traces, by = "trace")
   18. +-dplyr::filter(., case_classifier == first(case_classifier))
   19. +-dplyr::group_by(., trace_id)
   20. +-dplyr::inner_join(., cases, by = "case_classifier")
   21. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   22. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   23. +-dplyr::arrange(., timestamp_classifier, .order)
   24. +-base::as.data.frame(.)
   25. +-dplyr::rename(...)
   26. +-bupaR:::rename.log(...)
   27. \-`:=`("case_classifier", !!case_id_(log))
  -- Error ('test_trace_explorer.R:232:3'): test trace_explorer on eventlog with param `plotly` --
  Error in `eval_bare(expr, quo_get_env(quo))`: object 'chart' not found
  Backtrace:
      x
   1. \-testthat::expect_s3_class(chart, "ggplot") at test_trace_explorer.R:232:2
   2.   \-testthat::quasi_label(enquo(object), arg = "object")
   3.     \-rlang::eval_bare(expr, quo_get_env(quo))
  -- Error ('test_trace_explorer.R:252:3'): test trace_explorer on activitylog with default params --
  Error in ``:=`("case_classifier", !!case_id_(log))`: Check that is.data.table(DT) == TRUE. Otherwise, := and `:=`(...) are defined for use in j, once only and in particular ways. See help(":=").
  Backtrace:
       x
    1. +-testthat::expect_snapshot_warning(chart <- patients_act %>% trace_explorer()) at test_trace_explorer.R:252:2
    2. | \-testthat:::expect_snapshot_condition(...)
    3. |   \-testthat:::capture_matching_condition(x, cnd_matcher(class))
    4. |     \-base::withCallingHandlers(...)
    5. +-patients_act %>% trace_explorer()
    6. +-processmapR::trace_explorer(.)
    7. +-processmapR:::trace_explorer.activitylog(.)
    8. | \-log %>% bupaR::to_eventlog() %>% ...
    9. +-processmapR::trace_explorer(...)
   10. +-processmapR:::trace_explorer.eventlog(...)
   11. | \-... %>% ...
   12. +-dplyr::mutate(...)
   13. +-dplyr::mutate(., facets_abs = reorder(absolute_frequency, -relative_frequency))
   14. +-dplyr::mutate(...)
   15. +-dplyr::ungroup(.)
   16. +-dplyr::mutate(., rank_event = seq_len(n()))
   17. +-dplyr::arrange(., ts, min_order)
   18. +-dplyr::inner_join(., traces, by = "trace")
   19. +-dplyr::filter(., case_classifier == first(case_classifier))
   20. +-dplyr::group_by(., trace_id)
   21. +-dplyr::inner_join(., cases, by = "case_classifier")
   22. +-dplyr::rename(., ts = timestamp_classifier, min_order = .order)
   23. +-dplyr::distinct(., case_classifier, event_classifier, aid, .keep_all = TRUE)
   24. +-dplyr::arrange(., timestamp_classifier, .order)
   25. +-base::as.data.frame(.)
   26. +-dplyr::rename(...)
   27. +-bupaR:::rename.log(...)
   28. \-`:=`("case_classifier", !!case_id_(log))
  
  [ FAIL 26 | WARN 53 | SKIP 5 | PASS 84 ]
  Error: Test failures
  Execution halted