alfareg.tune(y, x, a = seq(0.1, 1, by = 0.1), K = 10,
mat = NULL, nc = 1, graph = FALSE)alfa, alfa.reglibrary(MASS)
y <- fgl[1:40, 2:4]
x <- fgl[1:40, 1]
mod <- alfareg.tune(y, x, a = c(0.2, 0.25, 0.3), K = 5, nc = 1)Run the code above in your browser using DataLab