Test Failure Found During R CMD Check #70
Description
We've been running R CMD check on packages for our package registry manager PRISM (Home | PRISM) and noticed that tidyvpc is failing with the following:
Error output:
checking tests Running testthat.R
Running the tests in tests/testthat.R failed.
Last 13 lines of output:
Failure ('test-binless.R:158:3'): cat vpc binless vpcstats are correct
Expected `vpc$stats` to equal `stats`.
Differences: Different number of rows
[ FAIL 1 | WARN 0 | SKIP 4 | PASS 56 ]
Error:
! Test failures.
Execution halted
Failing test (test-binless.R):
test_that("cat vpc binless vpcstats are correct", {
skip_on_cran()
obs_cat_data <- tidyvpc::obs_cat_data
sim_cat_data <- tidyvpc::sim_cat_data
vpc <- observed(obs_cat_data, x = agemonths, y = zlencat)
vpc <- simulated(vpc, sim_cat_data, y = DV)
vpc <- binless(vpc)
vpc <- suppressWarnings(vpcstats(vpc, vpc.type = "categorical"))
location <- system.file("extdata/Binless", "cat_stats.csv", package = "tidyvpc")
stats <- fread(location, colClasses = c(pname = "factor"))
setkeyv(stats, c("x"))
expect_equal(vpc$stats, stats)
})
Happy to provide any more details or clarity if needed.