Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/72.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R_R - Fatal编程技术网

R

R,r,R,我试图计算一个预测模型相对于真实案例的准确性。在这种情况下,我使用线性回归来预测我的期望值。曲线图显示了预测模型和实际模型之间的良好精度,但不如我的精度计算所显示的那样好。我使用以下代码在Rstudio中计算模型的精度: predicted <- import.list$y1 actual <- import.list$T_stp_cool comparison <- data.frame(actual,predicted) difference <- ((actual

我试图计算一个预测模型相对于真实案例的准确性。在这种情况下,我使用线性回归来预测我的期望值。曲线图显示了预测模型和实际模型之间的良好精度,但不如我的精度计算所显示的那样好。我使用以下代码在Rstudio中计算模型的精度:

predicted <- import.list$y1

actual <- import.list$T_stp_cool
comparison <- data.frame(actual,predicted)
difference <- ((actual-predicted)/actual)

accuracy=1-abs(mean(difference))

预测您可能想要尝试
平均值(abs(差))
。通过先取平均值,你允许正残差和负残差相互抵消。谢谢!成功了。