https://stats-learn.com/en/r-learn/easy-methods-to-calculate-rmse-in-r/