cg <- coglasso(multi_omics_sd_micro, p = c(4, 2), nlambda_w = 3,
nlambda_b = 3, nc = 3, verbose = FALSE)
# \donttest{
# Deprecated, use xstars() instead. Takes around one minute
sel_cg <- stars_coglasso(cg, verbose = FALSE)
# ->
sel_cg <- xstars(cg, verbose = FALSE)
# }
Run the code above in your browser using DataLab