残差占 R 中拟合值的百分比答案

【问题标题】：Residual as percentage of fitted value in R残差占 R 中拟合值的百分比
【发布时间】：2014-01-13 06:59:39
【问题描述】：

我在 R 中做一个基本的 lm 模型。我想获得最大和平均残差作为拟合值的百分比，但不知道如何去做。

例如，如果我有一个包含 3 个点的数据集 - 我的预测：(2, 8, 9)，并且我将它们与实际数据进行拟合：(4, 10, 12)，那么最大残差 (观察 - 预测）拟合值的百分比来自第一次匹配，因为它是拟合值的 100%（残差，4-2 = 2，拟合值，即我的预测是 2）。在这种情况下，平均剩余百分比为 (100 + 25 + 33)/3 = 52%（大约）。

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

非常感谢任何提供帮助的人！

【问题讨论】：

请提供一个可重现的小例子。
您的lm 调用将向您返回拟合值和残差。然后，您可以计算所有人的百分比并从中获取最大值。建议查看?lm 了解如何访问您需要的数据，提示：my.model$fitted 和my.model$resid
谢谢，搞定了 :-)

标签： r lm

【解决方案1】：

计数器 = 1

百分比 = 数字（）

拟合 = c(2, 8, 9)

残差 = c(2, 2, 3)

for（Fitted 中的元素） {Current_resid = 残差[计数器] Current_percent = abs((Current_resid/element)*100) 百分比 = c（百分比，Current_percent）计数器 = 计数器 + 1} Current_resid 柜台百分比 sum_Percent = sum(百分比) Average_Percent = sum_Percent/(counter-1)

计数器 = 1

【讨论】：