R Notebook

# p = predictions on testSet
# test = testSet 
# Compute errors: error
error <- p - test$price
# Calculate RMSE
RMSE <- sqrt(mean(error^2))
RMSE

[1] 1165.748