在R中绘制分组数据

Question

绘制数据。 x.values是16-23（年龄） 而对于每一年（16-23岁），我有5个不同的值，每个年龄在1到10之间。 我想要一个散点图，绘制每个年龄的所有五个值，然后使用回归线并计算之后的相关性。

x <- (16:23)
y<- c(10,8,9,9,8,7,8,6,9,6,6,7,7,8,5,5,8,4,7,6,8,7,6,8,4,6,5,7,5,3,5,1,3,4,2,4,1,2,5)

Studie <- plot(cbind(x, y))

这只是y的随机图。 Idk如何获得情节

Answer 1

如果我很好理解你的问题，我会这样做：

x <- rep(16:23, each=5)
y<- c(10,8,9,9,8,7,8,6,9,6,6,7,7,8,5,5,8,4,7,6,8,7,6,8,4,6,5,7,5,3,5,1,3,4,2,4,1,2,5, 2)
plot(x,y,col=x-15)
reg <- lm(y~x)
summary(reg)
lines(x, reg$fitted.values)

小心，矢量y中缺少一个值。我最后加了2个

回归线是： y = -0.7929 x + 21.2357