# NOT RUN {
DATA1 <- matrix(rnorm(50), nrow=5)
DATA2 <- matrix(rnorm(100), nrow=5)
DATA <- cbind(DATA1, DATA2)
Jk <- c(10, 20)
results <- maxLGlasso(DATA, Jk, R=5)
maxGLasso <- results$Glasso
maxLasso <- results$Lasso
# }
Run the code above in your browser using DataLab