Running ‘testthat.R’ [19s/29s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > test_check("JWileymisc")
  Loading required package: JWileymisc
                  N   M    SD   1.  2.    3.       4.      
  1. Sepal.Length 114 5.90 0.88  -  -0.13  0.86***  0.82***
  2. Sepal.Width  114 3.13 0.41      -    -0.49*** -0.44***
  3. Petal.Length 107 3.79 1.82            -        0.97***
  4. Petal.Width  115 1.24 0.80                     -      
  
  Percentage of coverage for each pairwise covariance or correlation
  
               Sepal.Length Sepal.Width Petal.Length Petal.Width
  Sepal.Length 0.76         0.57        0.54         0.57       
  Sepal.Width               0.76        0.54         0.59       
  Petal.Length                          0.71         0.53       
  Petal.Width                                        0.77       
  ""	"N"	"M"	"SD"	"1."	"2."	"3."	"4."
  "1. Sepal.Length"	"114"	"5.90"	"0.88"	" - "	"-0.13"	" 0.86***"	" 0.82***"
  "2. Sepal.Width"	"114"	"3.13"	"0.41"	""	" - "	"-0.49***"	"-0.44***"
  "3. Petal.Length"	"107"	"3.79"	"1.82"	""	""	" - "	" 0.97***"
  "4. Petal.Width"	"115"	"1.24"	"0.80"	""	""	""	" - "
                  N   M    SD   1.  2.    3.       4.      
  1. Sepal.Length 114 5.90 0.88  -  -0.13  0.86***  0.82***
  2. Sepal.Width  114 3.13 0.41      -    -0.49*** -0.44***
  3. Petal.Length 107 3.79 1.82            -        0.97***
  4. Petal.Width  115 1.24 0.80                     -      
  
  Percentage of coverage for each pairwise covariance or correlation
  
               Sepal.Length Sepal.Width Petal.Length Petal.Width
  Sepal.Length 0.76         0.57        0.54         0.57       
  Sepal.Width               0.76        0.54         0.59       
  Petal.Length                          0.71         0.53       
  Petal.Width                                        0.77       
  $`1`
  
  $`2`
  
  attr(,"class")
  [1] "list"      "ggarrange"
                  N  M    SD   1.  2.     
  1. Sepal.Length 50 5.01 0.35  -  0.74***
  2. Sepal.Width  50 3.43 0.38      -     
  
  Percentage of coverage for each pairwise covariance or correlation
  
               Sepal.Length Sepal.Width
  Sepal.Length 1            1          
  Sepal.Width               1          
                  N  M    SD   1.  2.  
  1. Sepal.Length 50 5.94 0.52  -  0.09
  2. Sepal.Width  50 2.77 0.31      -  
  
  Percentage of coverage for each pairwise covariance or correlation
  
               Sepal.Length Sepal.Width
  Sepal.Length 1            1          
  Sepal.Width               1          
                  N  M    SD   1.      2.     
  1. Sepal.Length 50 6.59 0.64  -      0.09***
  2. Sepal.Width  50 2.97 0.32 0.46***  -     
  
  Percentage of coverage for each pairwise covariance or correlation
  
               Sepal.Length Sepal.Width
  Sepal.Length 1            1          
  Sepal.Width               1          
           B (SE)           95% CI        
  Constant 20.09*** ( 1.07) [17.92, 22.26]
  R^2      0.00                           
  F        F(NA, NA) = NA   <NA>          
           B (SE)           95% CI        
  Constant 20.09*** ( 1.07) [17.92, 22.26]
  R^2      0.00                           
  F        F(NA, NA) = NA   <NA>          
           B (SE)                  95% CI        
  Constant 30.10*** ( 1.63)        [26.76, 33.44]
  hp       -0.07*** ( 0.01)        [-0.09, -0.05]
  R^2      0.60***                               
  F        F( 1.00, 30.00) = 45.46 p < .001      
               B (SE)                  95% CI          
  Constant      26.66*** (  0.97)      [ 24.68,  28.65]
  factor(cyl)6  -6.92*** (  1.56)      [-10.11,  -3.73]
  factor(cyl)8 -11.56*** (  1.30)      [-14.22,  -8.91]
  R^2          0.73***                                 
  F            F( 2.00, 29.00) = 39.70 p < .001        
               B (SE)                  95% CI          
  Constant      26.66*** (  0.97)      [ 24.68,  28.65]
  factor(cyl)6  -6.92*** (  1.56)      [-10.11,  -3.73]
  factor(cyl)8 -11.56*** (  1.30)      [-14.22,  -8.91]
  R^2          0.73***                                 
  F            F( 2.00, 29.00) = 39.70 p < .001        
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (1)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure (test-descriptives.R:189:15): winsorizor uses percentiles correctly for vectors and data frames / matrices ──
  apply(winsorizor(d2, 0.01), 2, range) not equivalent to `e2`.
  4/4 mismatches (average diff: NaN)
  [1] NA -  1 == NA
  [2] NA - 99 == NA
  [3] NA -  1 == NA
  [4] NA - 99 == NA
  ── Failure (test-descriptives.R:225:15): winsorizor can use specified values ───
  apply(winsorizor(d2, values = v2), 2, range) not equivalent to `e2`.
  4/4 mismatches (average diff: NaN)
  [1] NA -  2.5 == NA
  [2] NA - 97.5 == NA
  [3] NA -  3.5 == NA
  [4] NA - 96.5 == NA
  ── Error (test-distributions.R:45:3): testDistribution works with a multivariate normal distribution ──
  Error in `FUN(x, aperm(array(STATS, dims[perm]), order(perm)), ...)`: non-numeric argument to binary operator
  Backtrace:
      █
   1. ├─testthat::expect_is(...) test-distributions.R:45:2
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. ├─JWileymisc::testDistribution(mtcars[, 1:3], distr = "mvnormal")
   5. └─JWileymisc:::testDistribution.default(mtcars[, 1:3], distr = "mvnormal")
   6.   └─stats::mahalanobis(x[OK, ], desc$mu, desc$sigma)
   7.     └─base::sweep(x, 2L, center)
  ── Error (test-scoring.R:5:3): CheckVals works ─────────────────────────────────
  Error in `CheckVals(mtcars[, c("cyl", "am")], c(0, 1, 4, 6, 8))`: 
  The following values are not valid: 
  [c(6, 6, 4, 6, 8, 6, 8, 4, 4, 6, 6, 8, 8, 8, 8, 8, 8, 4, 4, 4, 4, 8, 8, 8, 8, 4, 4, 4, 8, 6, 8, 4), c(1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1)]
  Backtrace:
      █
   1. ├─testthat::expect_true(...) test-scoring.R:5:2
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─JWileymisc:::CheckVals(...)
  
  [ FAIL 4 | WARN 1 | SKIP 1 | PASS 384 ]
  Error: Test failures
  Execution halted