powered by
MSE(y_pred, y_true)
data(cars) reg <- lm(log(dist) ~ log(speed), data = cars) MSE(y_pred = exp(reg$fitted.values), y_true = cars$dist)
Run the code above in your browser using DataLab