CRAN Package Check Results for Package mbclusterwise

Last updated on 2022-04-24 03:52:30 CEST.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 1.0 11.16 90.95 102.11 OK
r-devel-linux-x86_64-debian-gcc 1.0 7.69 68.37 76.06 OK
r-devel-linux-x86_64-fedora-clang 1.0 119.35 OK
r-devel-linux-x86_64-fedora-gcc 1.0 106.23 OK
r-patched-linux-x86_64 1.0 13.40 87.39 100.79 OK
r-release-linux-x86_64 1.0 9.72 81.62 91.34 ERROR
r-release-macos-arm64 1.0 OK
r-release-macos-x86_64 1.0 OK
r-release-windows-x86_64 1.0 17.00 125.00 142.00 ERROR
r-oldrel-macos-arm64 1.0 OK
r-oldrel-macos-x86_64 1.0 OK
r-oldrel-windows-ix86+x86_64 1.0 19.00 156.00 175.00 OK

Check Details

Version: 1.0
Check: examples
Result: ERROR
    Running examples in ‘mbclusterwise-Ex.R’ failed
    The error most likely occurred in:
    
    > base::assign(".ptime", proc.time(), pos = "CheckExEnv")
    > ### Name: cw.tenfold
    > ### Title: F-Fold cross-validation for clusterwise multiblock analyses
    > ### Aliases: cw.tenfold
    > ### Keywords: multivariate cluster
    >
    > ### ** Examples
    >
    > data(simdata.red)
    > Data.X <- simdata.red[c(1:8, 21:28), 1:10]
    > Data.Y <- simdata.red[c(1:8, 21:28), 11:13]
    > res1 <- list()
    > res2 <- list()
    >
    > ## Note that the options (INIT=2) and (parallel.level = "low") are chosen to quickly
    > ## illustrate the function.
    > ## For real data, instead choose (INIT=20) to avoid local optima and (parallel.level = "high")
    > ## to improve the computing speed.
    >
    > for (H in c(1:2)){
    + print(paste("H=", H, sep=""))
    + res1[[H]] <- cw.tenfold(Y = Data.Y, X = Data.X, blo = c(5, 5), option = "none", G = 1, H,
    + FOLD = 2, INIT = 2, method = "mbpls", Gamma = NULL, parallel.level = "low")
    + res2[[H]] <- cw.tenfold(Y = Data.Y, X = Data.X, blo = c(5, 5), option = "none", G = 2, H,
    + FOLD = 2, INIT = 2, method = "mbpls", Gamma = NULL, parallel.level = "low")
    + }
    [1] "H=1"
    [1] "Fold 1"
    Warning in res$lX[, h]/sqrt(t(res$lX[, h]) %*% res$lX[, h]) :
     Recycling array of length 1 in vector-array arithmetic is deprecated.
     Use c() or as.vector() instead.
    
    [1] "Fold 2"
    Warning in res$lX[, h]/sqrt(t(res$lX[, h]) %*% res$lX[, h]) :
     Recycling array of length 1 in vector-array arithmetic is deprecated.
     Use c() or as.vector() instead.
    
    [1] "Fold 1"
    Warning in e$fun(obj, substitute(ex), parent.frame(), e$data) :
     already exporting variable(s): mbreg
    Warning in res$lX[, h]/sqrt(t(res$lX[, h]) %*% res$lX[, h]) :
     Recycling array of length 1 in vector-array arithmetic is deprecated.
     Use c() or as.vector() instead.
    
    Warning in res$lX[, h]/sqrt(t(res$lX[, h]) %*% res$lX[, h]) :
     Recycling array of length 1 in vector-array arithmetic is deprecated.
     Use c() or as.vector() instead.
    
    [1] "Fold 2"
    Warning in e$fun(obj, substitute(ex), parent.frame(), e$data) :
     already exporting variable(s): mbreg
    Error in { : task 1 failed - "0 x 0 matrix"
    Calls: cw.tenfold -> cw.multiblock -> %dopar% -> <Anonymous>
    Execution halted
Flavor: r-release-linux-x86_64

Version: 1.0
Check: examples
Result: ERROR
    Running examples in 'mbclusterwise-Ex.R' failed
    The error most likely occurred in:
    
    > ### Name: cw.tenfold
    > ### Title: F-Fold cross-validation for clusterwise multiblock analyses
    > ### Aliases: cw.tenfold
    > ### Keywords: multivariate cluster
    >
    > ### ** Examples
    >
    > data(simdata.red)
    > Data.X <- simdata.red[c(1:8, 21:28), 1:10]
    > Data.Y <- simdata.red[c(1:8, 21:28), 11:13]
    > res1 <- list()
    > res2 <- list()
    >
    > ## Note that the options (INIT=2) and (parallel.level = "low") are chosen to quickly
    > ## illustrate the function.
    > ## For real data, instead choose (INIT=20) to avoid local optima and (parallel.level = "high")
    > ## to improve the computing speed.
    >
    > for (H in c(1:2)){
    + print(paste("H=", H, sep=""))
    + res1[[H]] <- cw.tenfold(Y = Data.Y, X = Data.X, blo = c(5, 5), option = "none", G = 1, H,
    + FOLD = 2, INIT = 2, method = "mbpls", Gamma = NULL, parallel.level = "low")
    + res2[[H]] <- cw.tenfold(Y = Data.Y, X = Data.X, blo = c(5, 5), option = "none", G = 2, H,
    + FOLD = 2, INIT = 2, method = "mbpls", Gamma = NULL, parallel.level = "low")
    + }
    [1] "H=1"
    [1] "Fold 1"
    Warning in res$lX[, h]/sqrt(t(res$lX[, h]) %*% res$lX[, h]) :
     Recycling array of length 1 in vector-array arithmetic is deprecated.
     Use c() or as.vector() instead.
    
    [1] "Fold 2"
    Warning in res$lX[, h]/sqrt(t(res$lX[, h]) %*% res$lX[, h]) :
     Recycling array of length 1 in vector-array arithmetic is deprecated.
     Use c() or as.vector() instead.
    
    [1] "Fold 1"
    Warning in e$fun(obj, substitute(ex), parent.frame(), e$data) :
     already exporting variable(s): mbreg
    Error in { : task 2 failed - "0 x 0 matrix"
    Calls: cw.tenfold -> cw.multiblock -> %dopar% -> <Anonymous>
    Execution halted
Flavor: r-release-windows-x86_64