Running ‘testthat.R’ [14s/48s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(boxoffice)
  > 
  > test_check("boxoffice")
  ── 1. Failure: proper dimmensions (@test-column-values.R#9)  ───────────────────
  dim(christmas_num) not equal to c(43, 9).
  1/2 mismatches
  [1] 44 - 43 == 1
  
  ── 2. Failure: numeric columns are accurate (@test-column-values.R#36)  ────────
  christmas_num$gross[c(1:5, 39:43)] not equal to c(...).
  5/10 mismatches (average diff: 135)
  [6]  792 - 736 ==  56
  [7]  736 - 602 == 134
  [8]  602 - 593 ==   9
  [9]  593 - 160 == 433
  [10] 160 - 117 ==  43
  
  ── 3. Failure: numeric columns are accurate (@test-column-values.R#40)  ────────
  christmas_num$percent_change[c(1:5, 39:43)] not equal to c(56, 111, 147, 162, 113, 1, 3, 56, -35, -25).
  5/10 mismatches (average diff: 36.4)
  [6]   27 -   1 ==  26
  [7]    1 -   3 ==  -2
  [8]    3 -  56 == -53
  [9]   56 - -35 ==  91
  [10] -35 - -25 == -10
  
  ── 4. Failure: numeric columns are accurate (@test-column-values.R#43)  ────────
  christmas_num$theaters[c(1:5, 39:43)] not equal to c(4232, 3765, 3447, 3006, 2111, 8, 8, 9, 1, 1).
  3/10 mismatches (average diff: 3.67)
  [6] 10 - 8 ==  2
  [8]  8 - 9 == -1
  [9]  9 - 1 ==  8
  
  ── 5. Failure: numeric columns are accurate (@test-column-values.R#45)  ────────
  christmas_num$per_theater[c(1:5, 39:43)] not equal to c(6489, 5083, 1885, 1864, 1329, 92, 75, 66, 160, 117).
  5/10 mismatches (average diff: 35.2)
  [6]   79 -  92 == -13
  [7]   92 -  75 ==  17
  [8]   75 -  66 ==   9
  [9]   66 - 160 == -94
  [10] 160 - 117 ==  43
  
  ── 6. Failure: numeric columns are accurate (@test-column-values.R#48)  ────────
  christmas_num$total_gross[c(1:5, 39:43)] not equal to c(...).
  5/10 mismatches (average diff: 2837614)
  [6]   210278 - 7205484 == -6995206
  [7]  7205484 - 2289084 ==  4916400
  [8]  2289084 -  127398 ==  2161686
  [9]   127398 -   92117 ==    35281
  [10]   92117 -   12620 ==    79497
  
  ── 7. Failure: numeric columns are accurate (@test-column-values.R#53)  ────────
  christmas_num$days[c(1:5, 39:43)] not equal to c(11, 6, 4, 6, 34, 60, 67, 46, 67, 11).
  5/10 mismatches (average diff: 25.2)
  [6]  39 - 60 == -21
  [7]  60 - 67 ==  -7
  [8]  67 - 46 ==  21
  [9]  46 - 67 == -21
  [10] 67 - 11 ==  56
  
  ── 8. Failure: categorical columns are accurate (@test-column-values.R#73)  ────
  christmas_num$movie[c(1:5, 39:43)] not equal to c(...).
  5/10 mismatches
  x[6]: "The Breadwinner"
  y[6]: "Let There Be Light"
  
  x[7]: "Let There Be Light"
  y[7]: "The Killing of a Sacred Deer"
  
  x[8]: "The Killing of a Sacred Deer"
  y[8]: "Thelma"
  
  x[9]: "Thelma"
  y[9]: "BPM (Beats per Minute)"
  
  x[10]: "BPM (Beats per Minute)"
  y[10]: "Birdboy: The Forgotten Chil…"
  
  ── 9. Failure: categorical columns are accurate (@test-column-values.R#84)  ────
  christmas_num$distributor[c(1:5, 39:43)] not equal to c(...).
  4/10 mismatches
  x[6]: "GKIDS"
  y[6]: "Atlas Distribution"
  
  x[7]: "Atlas Distribution"
  y[7]: "A24"
  
  x[8]: "A24"
  y[8]: "The Orchard"
  
  x[10]: "The Orchard"
  y[10]: "GKIDS"
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 73 SKIPPED: 0 FAILED: 9
  1. Failure: proper dimmensions (@test-column-values.R#9) 
  2. Failure: numeric columns are accurate (@test-column-values.R#36) 
  3. Failure: numeric columns are accurate (@test-column-values.R#40) 
  4. Failure: numeric columns are accurate (@test-column-values.R#43) 
  5. Failure: numeric columns are accurate (@test-column-values.R#45) 
  6. Failure: numeric columns are accurate (@test-column-values.R#48) 
  7. Failure: numeric columns are accurate (@test-column-values.R#53) 
  8. Failure: categorical columns are accurate (@test-column-values.R#73) 
  9. Failure: categorical columns are accurate (@test-column-values.R#84) 
  
  Error: testthat unit tests failed
  Execution halted