swh:1:snp:3a44eb759780145deea094ac2a25c5049546a085
Tip revision: 84065fc768fe9969aa92efdb19e64d2b6a25df33 authored by Han Lin Shang on 29 July 2012, 09:02:07 UTC
version 3.4
version 3.4
Tip revision: 84065fc
rmse.R
`rmse` <- function(forecast, true)
{
if (length(forecast) != length(true))
stop("RMSE: the lengths of input vectors must be the same.")
err = sqrt(mean((true - forecast)^2))
return(round(err, 6))
}