alfarda.tune(x, ina, a = seq(-1, 1, by = 0.1), M = 10, gam = seq(0, 1, by = 0.1),
del = seq(0, 1, by = 0.1), ncores = 1, mat = NULL)alfa.rda, rda.tunelibrary(MASS)
x <- fgl[, 2:9]
ina <- fgl[, 10]
moda <- alfarda.tune(x, ina, a = seq(0.5, 1, by = 0.1), M = 10,
gam = seq(0, 0.7, by = 0.1), del = seq(0, 0.7, by = 0.1),
ncores = 1, mat = NULL)Run the code above in your browser using DataLab