Running ‘testthat.R’ [5s/19s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(baRcodeR)
  Loading required package: qrcode
  > 
  > test_check("baRcodeR")
  Testing ... : Invalid input. Please enter a numberTesting ... : Invalid input. Please enter a numberTesting ... : Testing ...: Testing ...: Testing ...: Testing ...: Menu testing ... 
  1 : Yes
  2 : NoMenu testing ... 
  1 : Yes
  2 : NoMenu testing ... 
  1 : Yes
  2 : NoInvalid input. Integer must be between 1 and 2Menu testing ... 
  1 : Yes
  2 : NoInvalid input. Integer must be between 1 and 2Menu testing ... 
  1 : Yes
  2 : NoInvalid input. Integer must be between 1 and 2Please enter string for level: Please enter the starting number for level (integer): Enter the ending number for level: Number of digits to print for level: Please enter string for level: Please enter the starting number for level (integer): Enter the ending number for level: Number of digits to print for level: Please enter string for level: Please enter the starting number for level (integer): Invalid input. Please enter a numberPlease enter the starting number for level (integer): Invalid input. Please enter a numberPlease enter the starting number for level (integer): What is the number of levels in hierarchy: String at end of label? 
  1 : Yes
  2 : NoNumber of digits to print: Please enter string for level 1: Enter the starting number for level 1: Enter the ending number for level 1: Please enter string for level 2: Enter the starting number for level 2: Enter the ending number for level 2: Please enter name for PDF output file: Please enter a font size: Select an error correction level. 
  1 : L (up to 7% damage)
  2 : M (up to 15% damage)
  3 : Q (up to 25% damage)
  4 : H (up to 30% damage)Edit advanced parameters?
  1 : Yes
  2 : NoType of Barcode: 
  1 : Matrix QR Code
  2 : LinearPrint labels across?
  1 : Yes
  2 : NoTruncate longer labels into multiple lines if necessary?
  1 : Yes
  2 : NoNumber of rows to skip? (enter 0 for default): Number of cols to skip? (enter 0 for default): Number of rows per page: Number of col per page: Please enter the height margin of page (in inches): Please enter the width margin of page (in inches): Please enter the width of the label (in inches): Please enter the height of the label (in inches): Change distances between QR code and text label?
   1: Yes 
   2: No── 1. Failure: labels are generated properly (@test-label_generation.R#10)  ────
  uniqID_maker(string = "example", level = 1:2, ending_string = "end") not identical to data.frame(...).
  Component "end_string": 'current' is not a factor
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  [ OK: 47 | SKIPPED: 1 | WARNINGS: 0 | FAILED: 1 ]
  1. Failure: labels are generated properly (@test-label_generation.R#10) 
  
  Error: testthat unit tests failed
  Execution halted