powered by
best.subsets(model, nbest = 5, nvmax, digits, force.in = "NULL")
lm
numeric
character
data <- data.frame(y = rnorm(8), x = factor(c('a','a','a','a','b','b','b','b')), z = factor(c('a','a','b','b','a','a','b','b'))) mod <- lm(y ~ x + z, data=data) best.subsets(mod)
Run the code above in your browser using DataLab