# NOT RUN {
# Load example data
data("Boston", package = "MASS")
# Split data into test- and training data
x_train <- head(Boston, -3)
# Fit a linear model
model <- lm(medv ~ lstat + rm + dis + indus, data = x_train)
# Writing out the defined model type of the object
model_type(x = model)
# }
Run the code above in your browser using DataLab