R/getBestModelVars.R

Defines functions getBestModelVars

Documented in getBestModelVars

getBestModelVars <-
function(mogavs,nvars,data,method=c("AIC","BIC","mse",NULL)){
  return(as.vector(sapply(nvars, function(x)colnames(data)[which(getBestModel(mogavs,x,method=method)==1)+1])))
}

Try the mogavs package in your browser

Any scripts or data that you put into this service are public.

mogavs documentation built on May 2, 2019, 1 a.m.