# NOT RUN {
data(SimData)
lambda <- msgl::lambda(x, classes, alpha = .5, d = 50, lambda.min = 0.05)
fit <- msgl::fit(x, classes, alpha = .5, lambda = lambda)
# the nonzero coefficients of the models 1, 10 and 20
coef(fit, index = c(1,10,20))
# }
Run the code above in your browser using DataLab