79285765

Date: 2024-12-16 18:52:52
Score: 1.5
Natty:
Report link
# Train a Linear Regression model
lm_model <- lm(medv ~ ., data = Boston, subset = train)
lm_pred <- predict(lm_model, X_test)

# Evaluate performance
mse_lm <- mean((y_test - lm_pred)^2)
print(paste("MSE for Linear Regression:", round(mse_lm, 2)))
Reasons:
  • Low length (0.5):
  • Has code block (-0.5):
  • Unregistered user (0.5):
  • Low reputation (1):
Posted by: user28810451