R/evaluation.R

In frost: Prediction of Minimum Temperature for Frost Forecasting in Agriculture

Defines functions rmse rsquared

# RMSE root mean squared error
rmse <- function(error)
{
  sqrt(mean(error^2))
}
# coefficient of correlation, also known as r squared value
rsquared <- function(a,b)
{
  (var(a)-(var(a)-var(b))) / var(a)
}

Try the frost package in your browser