# NOT RUN {
data(mtcars)
mtcars = modify(mtcars,{
var_lab(mpg) = NULL
val_lab(am) = c(" automatic" = 0, " manual" = 1)
})
summary(lm(mpg ~ ., data = values2labels(mtcars[,c("mpg","am")])))
# }
Run the code above in your browser using DataLab