# NOT RUN {
set.seed(1)
x <- matrix(rnorm(100 * 20), 100, 20)
y <- rnorm(100)
index <- 1:20
fit <- reg_sgl(X = x, y = y, index = index, gamma_w = 1, method_choice = "ic",
num_cores = 2, verbose = FALSE)
predict.reg_sgl(object = fit, newX = x)
# }
Run the code above in your browser using DataLab