剩余值占拟合值的百分比(R)

Question

我在R中做了一个基本的lm模型，我想得到最大和平均残差作为拟合值的百分比，但是我不知道该怎么做。

例如，如果我有一个3点的数据集--我的预测：(2，8，9) --我将它们与实际数据进行拟合：(4，10，12)，那么在拟合值的百分比方面，最大的残差(观察到-预测)是从第一次匹配开始的，因为它是拟合值的100% (残差，4-2 = 2，以及拟合值，即。我的预测是。平均残留率为(100±25 + 33)/3 = 52% (约)。

如果给定lm模型对象，是否有一个函数会产生这些结果，或者有人对如何为其编写代码有任何建议？我在R方面很新，不知道如何手动提取正确的数据。

感谢任何帮助你的人！

Answer 1

计数器=1

百分比=数字()

安装= c(2，8，9)

残差= c(2，2，3)

对于(元素) {Current_resid = ResidualsCounter Current_percent =abs((当前_resid/element)*100)百分比=c(百分比，Current_percent)计数器=计数器+ 1} Current_resid计数器百分比sum_Percent =sum(百分比) Average_Percent =sum_%/(计数器-1)

计数器=1