R语言入门——平均相对误差的计算

受同学所托写了个计算平均相对误差的函数,下面贴出来,不解释了用到自取。可以结和百分数的函数一块用输出百分数。

# 输入参数: real:真实值、 fore: 预测值
MRE <- function(real = 1:10, fore = 2:11){
  mre <- mean(abs(real - fore)/real)
  return(mre)
}
MRE()
發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章