Running ‘testthat.R’ [208s/247s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(reporter)
  Loading required package: common
  > library(fmtr)
  > library(dplyr)
  
  Attaching package: 'dplyr'
  
  The following object is masked from 'package:testthat':
  
      matches
  
  The following objects are masked from 'package:stats':
  
      filter, lag
  
  The following objects are masked from 'package:base':
  
      intersect, setdiff, setequal, union
  
  > library(tidyr)
  
  Attaching package: 'tidyr'
  
  The following object is masked from 'package:testthat':
  
      matches
  
  > library(magrittr)
  
  Attaching package: 'magrittr'
  
  The following object is masked from 'package:tidyr':
  
      extract
  
  The following objects are masked from 'package:testthat':
  
      equals, is_less_than, not
  
  > library(ggplot2)
  > 
  > test_check("reporter")
  # A user-defined format: 3 conditions
    Name Type Expression      Label Order
  1    x    U     x == 1     Setosa    NA
  2    x    U     x == 2 Versicolor    NA
  3    x    U     x == 3  Virginica    NA
  # A user-defined format: 3 conditions
    Name Type Expression      Label Order
  1    x    U     x == 1     Setosa    NA
  2    x    U     x == 2 Versicolor    NA
  3    x    U     x == 3  Virginica    NA
  # A user-defined format: 3 conditions
    Name Type Expression      Label Order
  1    x    U     x == 1     Setosa    NA
  2    x    U     x == 2 Versicolor    NA
  3    x    U     x == 3  Virginica    NA
  # A user-defined format: 3 conditions
    Name Type Expression      Label Order
  1    x    U     x == 1     Setosa    NA
  2    x    U     x == 2 Versicolor    NA
  3    x    U     x == 3  Virginica    NA
  # A user-defined format: 3 conditions
    Name Type Expression      Label Order
  1    x    U     x == 1     Setosa    NA
  2    x    U     x == 2 Versicolor    NA
  3    x    U     x == 3  Virginica    NA
  [ FAIL 2 | WARN 0 | SKIP 0 | PASS 1661 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-pdf2.R:2196:3'): pdf2-58: Glue feature works. ──────────────────
  Error in `strwidth(wrds, units = un)`: conversion failure on 'Rightˣ' in 'mbcsToSbcs': for ˣ
  Backtrace:
       ▆
    1. └─reporter::write_report(rpt) at test-pdf2.R:2196:2
    2.   └─reporter:::write_report_pdf2(x)
    3.     └─reporter:::page_setup_pdf(rs)
    4.       └─reporter:::page_template_pdf(rs)
    5.         └─reporter:::get_page_header_pdf(rs)
    6.           └─reporter:::split_string_text(hr[[i]], rwdth, rs$units)
    7.             └─reporter:::split_strings(cstrng, width - indntw, units, multiplier = 1)
    8.               ├─base::suppressWarnings(strwidth(wrds, units = un))
    9.               │ └─base::withCallingHandlers(...)
   10.               └─graphics::strwidth(wrds, units = un)
  ── Error ('test-rtf2.R:2247:3'): rtf2-63: Glue works. ──────────────────────────
  Error in `strwidth(wrds, units = un)`: conversion failure on 'Trend⁶' in 'mbcsToSbcs': for ⁶
  Backtrace:
       ▆
    1. └─reporter::write_report(rpt) at test-rtf2.R:2247:2
    2.   └─reporter:::write_report_rtf2(x)
    3.     └─reporter:::page_setup_rtf(rs)
    4.       └─reporter:::page_template_rtf(rs)
    5.         └─reporter:::get_page_header_rtf(rs)
    6.           └─reporter:::split_string_rtf(hl[[i]], lwdth, rs$units)
    7.             └─reporter:::split_strings(cstrng, width - indntw, units, multiplier = mp)
    8.               ├─base::suppressWarnings(strwidth(wrds, units = un))
    9.               │ └─base::withCallingHandlers(...)
   10.               └─graphics::strwidth(wrds, units = un)
  
  [ FAIL 2 | WARN 0 | SKIP 0 | PASS 1661 ]
  Error: Test failures
  Execution halted