# NOT RUN {
# iris data
if (require(nlme, quietly=TRUE)) {
model <- lme(Sepal.Width ~ Sepal.Length + Petal.Length, random=~1|Species, data=iris)
beta(model) # all three variables standardized
beta(model, skip='Petal.Length') # all variables except Petal.Length standardized
}
# }
Run the code above in your browser using DataLab