# NOT RUN {
n <- 300
mu <- 15.5
sd <- 8.80
mse <- 50.43
rmse <- sqrt(mse)
rrmse <- rmse / mu * 100
srmse <- rmse / sd
msre <- mse / sd ^ 2
tovecv(n=n, mu=mu, s=sd, m=mse, measure="mse")
tovecv(n=n, mu=mu, s=sd, m=rmse, measure="rmse")
tovecv(n=n, mu=mu, s=sd, m=rrmse, measure="rrmse")
tovecv(n=n, mu=mu, s=sd, m=srmse, measure="srmse")
tovecv(n=n, mu=mu, s=sd, m=msre, measure="msre")
# }
Run the code above in your browser using DataLab