r - R中散点图标准偏差的计算

Question

我使用 R 创建了两个向量的散点图，并结合了代表 x=y 对角线的线（使用abline ）。我希望从对角线计算点的标准偏差，并为第一和第三分位数之间的区域着色。
我不知道如何做到这一点，并会感谢所有帮助！提前致谢。朝觐。

Answer 1

好吧，你想要做的是：

# sample data
x <- rnorm(50,0,2)
y <- x+rnorm(50,0,2)

# construct polygons
div <- quantile(y-x,c(0.25,0.75))
x1 <- min(c(x,y))
x2 <- max(c(x,y))


plot(x,y,type="n")
polygon(x=c(x1,x1,x2,x2),y=c(x1+div,(x2+div)[c(2,1)]),col="grey")
abline(0,1)
points(x,y)

我要做的是：

qplot(x,y,geom="point") + stat_smooth(method="lm")

您要计算的标准差是

sd(y-x)

您可能正在寻找的正确措施是：

sd(residuals(lm(y~x)))

您应该考虑 y 在 x 上的线性模型以获得任何有意义的结果，除非您有充分的理由不这样做。如果 x 和 y 之间的关系不是 1 对 1，那么假设正确的模型是没有意义的。如果 x 与 y 的关系不是 1 对 1，则 yx 将不会呈正态分布，因此 sd 将难以以有意义的方式解释。