Running 'spelling.R' [0s/0s]
  Running 'testthat.R' [190s/214s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(httptest)
  Loading required package: testthat
  > options(crunch.check.updates = FALSE)
  > if (nchar(Sys.getenv("JENKINS_HOME"))) {
  +     test_check("crunch",
  +         reporter = MultiReporter$new(list(
  +             SummaryReporter$new(),
  +             JunitReporter$new(file = file.path(Sys.getenv("WORKSPACE"), "rcrunch.xml"))
  +         ))
  +     )
  + } else {
  +     test_check("crunch")
  + }
  Loading required package: crunch
  
  Attaching package: 'crunch'
  
  The following objects are masked from 'package:stats':
  
      filter, rstandard, setNames
  
  The following object is masked from 'package:graphics':
  
      title
  
  The following object is masked from 'package:utils':
  
      write.csv
  
  The following object is masked from 'package:base':
  
      table
  
  
  [31m--[39m [31m1. Failure: margin table returns a cube-calculation (@test-cube-calculations.[39m
  `marg` inherits from `numeric` not `CrunchCubeCalculation`.
  
  [31m--[39m [31m2. Failure: margin table returns a cube-calculation (@test-cube-calculations.[39m
  attr(marg, "type") not equal to "margin".
  target is NULL, current is character
  
  [31m--[39m [31m3. Failure: margin table returns a cube-calculation (@test-cube-calculations.[39m
  `dims` inherits from `NULL` not `CubeDims`.
  
  [31m--[39m [31m4. Failure: margin table returns a cube-calculation (@test-cube-calculations.[39m
  `print(object)` does not match "shower_thoughts_klima_2\n       Cupcakes are the best cakes Corgis are the future of dog shows \n                         21453.031                          19390.097 \n    I always ride a penny-farthing           I never look at eclipses \n                         24793.106                          20314.818 \n           I never mess with Texas  I don't mind pickles on my burger \n                          7865.977                          12669.603 ".
  Actual value: "       Cupcakes are the best cakes Corgis are the future of dog shows \n                         21453.031                          19390.097 \n    I always ride a penny-farthing           I never look at eclipses \n                         24793.106                          20314.818 \n           I never mess with Texas  I don't mind pickles on my burger \n                          7865.977                          12669.603 "
  
  [31m--[39m [31m5. Failure: index table on a bivariate cube (@test-cube-index-table.R#31) [39m [31m--[39m
  as.array(index.table(catXcat_cube, 1)) not equal to cubify(107.142857142857, 85.7142857142857, 93.75, 112.5, dims = catXcat_names).
  2/4 mismatches (average diff: Inf)
  [3] Inf -  85.7 ==  Inf
  [4] 129 - 112.5 == 16.1
  
  [31m--[39m [31m6. Failure: index table on a bivariate cube (@test-cube-index-table.R#40) [39m [31m--[39m
  as.array(index.table(catXcat_cube, 2)) not equal to cubify(100, 80, 100, 120, dims = catXcat_names).
  2/4 mismatches (average diff: Inf)
  [2] 200 - 100 == 100
  [4] Inf - 120 == Inf
  
  [31m--[39m [31m7. Failure: index table with baseline (@test-cube-index-table.R#51) [39m [31m--------[39m
  as.array(index.table(catXcat_cube, 1, c(0.6, 0.4))) not equal to cubify(...).
  2/4 mismatches (average diff: Inf)
  [3] Inf - 71.4 ==  Inf
  [4] 107 - 93.8 == 13.4
  
  [31m--[39m [31m8. Failure: index table with baseline (@test-cube-index-table.R#60) [39m [31m--------[39m
  as.array(index.table(catXcat_cube, 2, c(0.6, 0.4))) not equal to cubify(83.3333333333333, 66.6666666666667, 125, 150, dims = catXcat_names).
  2/4 mismatches (average diff: Inf)
  [2] 250 - 125 == 125
  [4] Inf - 150 == Inf
  
  [31m--[39m [31m9. Failure: index table with baseline (@test-cube-index-table.R#69) [39m [31m--------[39m
  as.array(...) not equal to cubify(83.3333333333333, 100, 125, 100, dims = catXcat_names).
  2/4 mismatches (average diff: Inf)
  [2] 250 - 125 == 125
  [4] Inf - 100 == Inf
  
  [31m--[39m [31m10. Failure: margin.table for as_selected x cat (@test-cube-mr.R#53) [39m [31m-------[39m
  as.array(margin.table(mr_x_cat_wt, 1)) not equal to cubify(...).
  Attributes: < Component "dimnames": names for current but not for target >
  
  [31m--[39m [31m11. Failure: margin.table for as_selected x cat (@test-cube-mr.R#82) [39m [31m-------[39m
  as.array(margin.table(mr_x_cat_wt)) not equal to cubify(...).
  Attributes: < Component "dimnames": names for current but not for target >
  
  [31m--[39m [31m12. Failure: margin.table for cat x as_selected (@test-cube-mr.R#158) [39m [31m------[39m
  as.array(margin.table(cat_x_mr, 2)) not equal to cubify(...).
  Attributes: < Component "dimnames": names for current but not for target >
  
  [31m--[39m [31m13. Failure: margin.table for cat x as_selected (@test-cube-mr.R#165) [39m [31m------[39m
  as.array(margin.table(cat_x_mr)) not equal to cubify(...).
  Attributes: < Component "dimnames": names for current but not for target >
  
  [31m--[39m [31m14. Failure: simple with row subtotals (margins and proportions) (@test-cube-[39m
  as.array(margin.table(pet_feelings, 2)) not equivalent to `pets_margin`.
  Lengths differ: 3 is not 2
  
  [31m--[39m [31m15. Failure: simple with row subtotals (margins and proportions) (@test-cube-[39m
  as.array(prop.table(pet_feelings, 2)) not equivalent to `pets_prop`.
  8/14 mismatches (average diff: Inf)
  [2]    Inf - 0.222 ==     Inf
  [3]  0.457 - 0.389 ==  0.0676
  [5]    Inf - 0.185 ==     Inf
  [6]  0.239 - 0.204 ==  0.0354
  [9]  0.222 - 0.261 == -0.0386
  [10]   Inf - 0.370 ==     Inf
  [12] 0.185 - 0.217 == -0.0322
  [13]   Inf - 0.261 ==     Inf
  
  [31m--[39m [31m16. Failure: cat by cat with column subtotals (margins and proportions) (@tes[39m
  as.array(margin.table(cat_by_cat, 1)) not equivalent to `row_margin`.
  Lengths differ: 11 is not 8
  
  [31m--[39m [31m17. Failure: cat by cat with column subtotals (margins and proportions) (@tes[39m
  as.array(prop.table(cat_by_cat, 1)) not equivalent to `row_prop`.
  47/56 mismatches (average diff: Inf)
  [9]     Inf - 0.728 ==     Inf
  [10] 1.3248 - 0.788 ==  0.5365
  [12] 0.2591 - 0.734 == -0.4748
  [13] 1.2660 - 0.571 ==  0.6953
  [14]    Inf - 0.779 ==     Inf
  [15] 0.5548 - 0.765 == -0.2104
  [16] 0.0536 - 0.627 == -0.5739
  [17] 0.7765 - 0.307 ==  0.4699
  [18] 0.3795 - 0.300 ==  0.0798
  ...
  
  [31m--[39m [31m18. Failure: simple margin.table (@test-cubes.R#115) [39m [31m-----------------------[39m
  as.array(margin.table(a1, 1)) not identical to cubify(13, 11, dims = df.dims["v4"]).
  Attributes: < Component "dimnames": names for current but not for target >
  
  [31m--[39m [31m19. Failure: simple margin.table (@test-cubes.R#119) [39m [31m-----------------------[39m
  as.array(margin.table(a1, 2)) not identical to cubify(14, 5, 5, dims = df.dims["v7"]).
  Lengths differ: 4 is not 3
  
  [31m--[39m [31m20. Failure: margin.table with missing (@test-cubes.R#131) [39m [31m-----------------[39m
  as.array(margin.table(a2, 1)) not identical to cubify(10, 9, dims = df.dims["v4"]).
  Attributes: < Component "dimnames": names for current but not for target >
  
  [31m--[39m [31m21. Failure: margin.table with missing (@test-cubes.R#135) [39m [31m-----------------[39m
  as.array(margin.table(a2, 2)) not identical to cubify(14, 5, dims = list(v7 = c("C", "E"))).
  Lengths differ: 4 is not 2
  
  [31m--[39m [31m22. Failure: margin.table with missing (@test-cubes.R#143) [39m [31m-----------------[39m
  as.array(margin.table(a2, 1)) not identical to cubify(13, 11, dims = df.dims["v4"]).
  Attributes: < Component "dimnames": names for current but not for target >
  
  [31m--[39m [31m23. Failure: margin.table with missing (@test-cubes.R#147) [39m [31m-----------------[39m
  as.array(margin.table(a2, 2)) not identical to cubify(14, 5, 5, dims = df.dims["v7"]).
  Lengths differ: 4 is not 3
  
  [31m--[39m [31m24. Failure: margin.table with missing (@test-cubes.R#154) [39m [31m-----------------[39m
  as.array(margin.table(a2, 1)) not identical to cubify(13, 11, dims = df.dims["v4"]).
  Attributes: < Component "dimnames": names for current but not for target >
  
  [31m--[39m [31m25. Failure: margin.table with missing (@test-cubes.R#158) [39m [31m-----------------[39m
  as.array(margin.table(a2, 2)) not identical to cubify(14, 5, 5, 0, dims = list(v7 = c(LETTERS[3:5], "No Data"))).
  Attributes: < Component "dimnames": names for current but not for target >
  
  == testthat results  ===========================================================
  [ OK: 3092 | SKIPPED: 16 | WARNINGS: 0 | FAILED: 25 ]
  1. Failure: margin table returns a cube-calculation (@test-cube-calculations.R#28) 
  2. Failure: margin table returns a cube-calculation (@test-cube-calculations.R#29) 
  3. Failure: margin table returns a cube-calculation (@test-cube-calculations.R#31) 
  4. Failure: margin table returns a cube-calculation (@test-cube-calculations.R#33) 
  5. Failure: index table on a bivariate cube (@test-cube-index-table.R#31) 
  6. Failure: index table on a bivariate cube (@test-cube-index-table.R#40) 
  7. Failure: index table with baseline (@test-cube-index-table.R#51) 
  8. Failure: index table with baseline (@test-cube-index-table.R#60) 
  9. Failure: index table with baseline (@test-cube-index-table.R#69) 
  1. ...
  
  Error: testthat unit tests failed
  Total teardown: Time difference of 5.38826e-05 secs
  Execution halted