CRAN Package Check Results for Package simputation

Last updated on 2018-10-24 02:49:11 CEST.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 0.2.2 2.57 39.30 41.87 OK
r-devel-linux-x86_64-debian-gcc 0.2.2 2.20 29.71 31.91 OK
r-devel-linux-x86_64-fedora-clang 0.2.2 48.70 OK
r-devel-linux-x86_64-fedora-gcc 0.2.2 46.03 OK
r-devel-windows-ix86+x86_64 0.2.2 11.00 92.00 103.00 ERROR
r-patched-linux-x86_64 0.2.2 2.56 33.15 35.71 OK
r-patched-solaris-x86 0.2.2 65.30 OK
r-release-linux-x86_64 0.2.2 2.59 34.03 36.62 OK
r-release-windows-ix86+x86_64 0.2.2 7.00 82.00 89.00 OK
r-release-osx-x86_64 0.2.2 OK
r-oldrel-windows-ix86+x86_64 0.2.2 7.00 87.00 94.00 OK
r-oldrel-osx-x86_64 0.2.2 OK

Check Details

Version: 0.2.2
Check: running tests for arch ‘i386’
Result: ERROR
     Running 'testthat.R' [6s]
    Running the tests in 'tests/testthat.R' failed.
    Complete output:
     > if ( require(testthat) ) test_check("simputation")
     Loading required package: testthat
     Loading required package: simputation
     -- 1. Failure: missForest imputation (@test_em.R#40) --------------------------
     !any(is.na(impute_mf(dat, Species + Sepal.Length ~ Sepal.Width))) isn't true.
    
     -- 2. Failure: missForest imputation (@test_em.R#42) --------------------------
     sum(is.na(d1[, 1])) not equal to 0.
     1/1 mismatches
     [1] 3 - 0 == 3
    
     -- 3. Error: stuff gets imputed (@test_lm.R#44) -------------------------------
     replacement has 1 row, data has 0
     1: expect_equal(sum(is.na(f(irisNA, . ~ 1))), 0, info = fun) at testthat/test_lm.R:44
     2: quasi_label(enquo(object), label)
     3: eval_bare(get_expr(quo), get_env(quo))
     4: f(irisNA, . ~ 1)
     5: tryCatch(dat[ina, p] <- if (add_residual == "none") {
     const
     } else if (nmiss == 0) {
     warning("All values missing, so no random residuals added")
     const
     } else {
     const + get_res(nmiss = nmiss, residuals = const - dat[!ina, p], type = add_residual)
     }, warning = function(w) {
     })
     6: tryCatchList(expr, classes, parentenv, handlers)
     7: tryCatchOne(expr, names, parentenv, handlers[[1L]])
     8: doTryCatch(return(expr), name, parentenv, handler)
     9: `[<-`(`*tmp*`, ina, p, value = 1)
     10: `[<-.data.frame`(`*tmp*`, ina, p, value = 1)
     11: stop(sprintf(ngettext(N, "replacement has %d row, data has %d", "replacement has %d rows, data has %d"),
     N, n), domain = NA)
    
     == testthat results ===========================================================
     OK: 120 SKIPPED: 1 FAILED: 3
     1. Failure: missForest imputation (@test_em.R#40)
     2. Failure: missForest imputation (@test_em.R#42)
     3. Error: stuff gets imputed (@test_lm.R#44)
    
     Error: testthat unit tests failed
     Execution halted
Flavor: r-devel-windows-ix86+x86_64

Version: 0.2.2
Check: running tests for arch ‘x64’
Result: ERROR
     Running 'testthat.R' [7s]
    Running the tests in 'tests/testthat.R' failed.
    Complete output:
     > if ( require(testthat) ) test_check("simputation")
     Loading required package: testthat
     Loading required package: simputation
     -- 1. Failure: missForest imputation (@test_em.R#40) --------------------------
     !any(is.na(impute_mf(dat, Species + Sepal.Length ~ Sepal.Width))) isn't true.
    
     -- 2. Failure: missForest imputation (@test_em.R#42) --------------------------
     sum(is.na(d1[, 1])) not equal to 0.
     1/1 mismatches
     [1] 3 - 0 == 3
    
     -- 3. Error: stuff gets imputed (@test_lm.R#44) -------------------------------
     replacement has 1 row, data has 0
     1: expect_equal(sum(is.na(f(irisNA, . ~ 1))), 0, info = fun) at testthat/test_lm.R:44
     2: quasi_label(enquo(object), label)
     3: eval_bare(get_expr(quo), get_env(quo))
     4: f(irisNA, . ~ 1)
     5: tryCatch(dat[ina, p] <- if (add_residual == "none") {
     const
     } else if (nmiss == 0) {
     warning("All values missing, so no random residuals added")
     const
     } else {
     const + get_res(nmiss = nmiss, residuals = const - dat[!ina, p], type = add_residual)
     }, warning = function(w) {
     })
     6: tryCatchList(expr, classes, parentenv, handlers)
     7: tryCatchOne(expr, names, parentenv, handlers[[1L]])
     8: doTryCatch(return(expr), name, parentenv, handler)
     9: `[<-`(`*tmp*`, ina, p, value = 1)
     10: `[<-.data.frame`(`*tmp*`, ina, p, value = 1)
     11: stop(sprintf(ngettext(N, "replacement has %d row, data has %d", "replacement has %d rows, data has %d"),
     N, n), domain = NA)
    
     == testthat results ===========================================================
     OK: 120 SKIPPED: 1 FAILED: 3
     1. Failure: missForest imputation (@test_em.R#40)
     2. Failure: missForest imputation (@test_em.R#42)
     3. Error: stuff gets imputed (@test_lm.R#44)
    
     Error: testthat unit tests failed
     Execution halted
Flavor: r-devel-windows-ix86+x86_64