# NOT RUN {
library(psycho)
df <- mtcars %>%
mutate(cyl = as.factor(cyl))
fit <- lm(wt ~ mpg * cyl, data = df)
fit <- lmerTest::lmer(wt ~ mpg * cyl + (1 | gear), data = df)
summary(fit)
standardize(fit)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab