alfa.reg(y, x, a, xnew = NULL, yb = NULL)diri.reg, esov.compreg, kl.compreg, ols.compreg, comp.reglibrary(MASS)
x <- fgl[1:40, 1]
y <- fgl[1:40, 2:9]
mod1 <- alfa.reg(y, x, 0.2)
#mod2 <- alfa.reg(y, x, 1)Run the code above in your browser using DataLab