CRAN Package Check Results for Maintainer ‘Stephanie Bougeard <stephanie.bougeard at anses.fr>’

Last updated on 2022-04-24 03:53:05 CEST.

Package	ERROR	OK
mbclusterwise	2	10

Package mbclusterwise

Current CRAN status: ERROR: 2, OK: 10

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