powered by
takes difference between Original data and Predicted data as input
rmse(obs, pred)
numeric vector of original data
numeric vector of predicted data
rmseVal as Root Mean Square Error
# NOT RUN { ## Generate 100 random numbers within some limits x <- sample(1:7, 100, replace = TRUE) y <- sample(1:4, 100, replace = TRUE) z <- rmse(x, y) z # }
Run the code above in your browser using DataLab