Running 'testthat.R' [47s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(dtrackr)
  
  Attaching package: 'dtrackr'
  
  The following object is masked from 'package:stats':
  
      filter
  
  The following object is masked from 'package:utils':
  
      history
  
  The following object is masked from 'package:base':
  
      comment
  
  > library(tidyverse)
  ── Attaching packages ─────────────────────────────────────── tidyverse 1.3.1 ──
  ✔ ggplot2 3.3.6     ✔ purrr   0.3.4
  ✔ tibble  3.1.7     ✔ dplyr   1.0.9
  ✔ tidyr   1.2.0     ✔ stringr 1.4.0
  ✔ readr   2.1.2     ✔ forcats 0.5.1
  ── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
  ✖ dplyr::add_count()     masks dtrackr::add_count()
  ✖ dplyr::add_tally()     masks dtrackr::add_tally()
  ✖ dplyr::bind_rows()     masks dtrackr::bind_rows()
  ✖ readr::edition_get()   masks testthat::edition_get()
  ✖ dplyr::filter()        masks dtrackr::filter(), stats::filter()
  ✖ purrr::is_null()       masks testthat::is_null()
  ✖ dplyr::lag()           masks stats::lag()
  ✖ readr::local_edition() masks testthat::local_edition()
  ✖ dplyr::matches()       masks tidyr::matches(), testthat::matches()
  > 
  > test_check("dtrackr")
  Error : RStudio not running
  Error : RStudio not running
  Error : RStudio not running
  Error : RStudio not running
  [ FAIL 1 | WARN 0 | SKIP 0 | PASS 38 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure (test-group_by.R:13:3): group by works ──────────────────────────────
  `{ ... }` threw an error with unexpected message.
  Expected match: "Must group by variables found in `.data`"
  Actual message: "number of characters is not computable in \"bytes\" encoding, element 1"
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-group_by.R:13:2
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─... %>% dtrackr::flowchart() at test-group_by.R:14:4
    7. ├─dtrackr::flowchart(.)
    8. │ └─"trackr_df" %in% class(.data)
    9. ├─dplyr::summarise(., across(ends_with("Width"), mean))
   10. ├─dplyr::group_by(., NotPresent)
   11. ├─dtrackr:::group_by.trackr_df(., NotPresent)
   12. │ └─... %>% dplyr::groups()
   13. ├─dplyr::groups(.)
   14. ├─dplyr::group_by(., ..., .add = .add, .drop = .drop)
   15. └─dplyr:::group_by.data.frame(., ..., .add = .add, .drop = .drop)
   16.   └─dplyr::group_by_prepare(.data, ..., .add = .add, caller_env = caller_env())
   17.     └─rlang::abort(bullets, call = error_call)
   18.       └─rlang:::signal_abort(cnd, .file)
   19.         └─base::signalCondition(cnd)
   20.           ├─base::conditionMessage(cond)
   21.           └─rlang:::conditionMessage.rlang_error(cond)
   22.             └─rlang::cnd_message(c)
   23.               └─rlang:::cnd_message_format(cnd, ...)
   24.                 └─rlang (local) cli_format(glue_escape(lines))
   25.                   └─rlang:::.rlang_cli_format(x, cli::format_error)
   26.                     └─cli::cli_format(x, .envir = emptyenv())
   27.                       └─cli:::fmt(...)
   28.                         └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   29.                           ├─base::do.call(app[[msg$type]], msg$args)
   30.                           └─cli (local) `<fn>`(text = `<named list>`, id = "cli-24140-3", class = NULL)
   31.                             └─cli:::clii_bullets(app, text, id, class)
   32.                               └─base::lapply(...)
   33.                                 └─cli (local) FUN(X[[i]], ...)
   34.                                   └─app$text(text[[i]])
   35.                                     └─cli:::clii_text(app, text)
   36.                                       └─app$xtext(text)
   37.                                         └─cli:::clii__xtext(...)
   38.                                           └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   39.                                             └─base::lapply(pars, ansi_trimws)
   40.                                               └─cli (local) FUN(X[[i]], ...)
  
  [ FAIL 1 | WARN 0 | SKIP 0 | PASS 38 ]
  Error: Test failures
  Execution halted