楼主: xyz123342963
32772 17

[有偿编程] 请问在R里如何算出RMSE,MAPE之类的结果呢 [推广有奖]

11
雪凤夏洛 发表于 2018-5-17 18:34:41
xionglidi 发表于 2018-5-16 10:20
请问这个函数是r自带的吗?我写进去提示我说没有这个函数
安装一个 forecast 包

12
xionglidi 发表于 2018-5-18 20:04:41
谢谢~~

13
xionglidi 发表于 2018-5-18 20:05:08
keithchan13 发表于 2018-5-16 12:36
这个是DMwR包里面的。这段代码是作者写的一本书上的原文
谢谢~~~

14
xionglidi 发表于 2018-5-18 20:05:38
雪凤夏洛 发表于 2018-5-17 18:34
安装一个 forecast 包
谢谢~~

15
hifinecon 发表于 2018-5-18 21:31:36
复制下面的code,执行就可以得到RMSE
library(Metrics)
# Split mtcars dataframe into train and test set
train <- mtcars[1:24,]
test <- mtcars[25:32,]

# Create multivariate model for mpg depending on weight and hp
mod1 <- lm(mpg ~ wt + hp, data = train)

# See predictions on test set
predictions <- predict(mod1, test)

#Calculate RMSE and MAPE
rmse(test$mpg, predictions)
mape(test$mpg, predictions)
已有 1 人评分热心指数 收起 理由
HanghangKE + 5 精彩帖子

总评分: 热心指数 + 5   查看全部评分

16
hifinecon 发表于 2018-5-18 21:56:48
rmse(test$mpg, predictions)
mape(test$mpg, predictions)

17
zhangok 发表于 2018-5-25 12:55:49
RSME的计算很简单,可以自编函数或者公式,只要知道计算公式,其他的统计量也可以计算。比如RSME的计算:
MSE=sum(x1-x2)^2/length(x1)
RMSE=sqrt(MSE)
已有 1 人评分学术水平 收起 理由
HanghangKE + 5 观点有启发

总评分: 学术水平 + 5   查看全部评分

18
florida2333 发表于 2019-3-18 15:10:28
pred=forecast(model,h=20)
accuracy(pred)[2]
即可提取RMSE

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2026-1-1 02:18