R语言在ggplot中用一条线连接红点

oxf4rvwz 于 2022-12-06 发布在其他

关注(0)|答案(1)|浏览(142)

请帮帮我;我用ggplot做了一个由红点和蓝点组成的图。现在我想用一条线把红点彼此连接起来，用另一条线把蓝点彼此连接起来。这些是我的代码

m <- as.factor(c(7,"12 PCA", 21, "24 PCA", "31 PCA", 38, 70))
## Then we plot the points 
ggplot(pH, aes(x= m, y=All))+ ylim(60,100)+
 scale_x_discrete(limits=c(7,"12 PCA", 21, "24 PCA", "31 PCA", 38, 70))+
 geom_point(data=pH, aes(y=All), colour = 'red', size =1)+
 geom_point(data=pH, aes(y=Test), colour = 'blue', size=1)

这是我的图x1c 0d1x
我该怎么做？谢谢

来源：https://stackoverflow.com/questions/74649914/connect-the-red-points-with-a-line-in-ggplot

1条答案

按热度按时间

ne5o7dgx1#

我认为一般情况下，最好不要使用独立的数据矢量，而是将其放在一个框架中。在这种情况下，将使用一列来指示点属于哪个“组”。

dat <- data.frame(m=c(m,m), All=c(94,95,96,95,94,95,96, 74,67,74,67,68,73,74), grp=c(rep("red",7), rep("blue",7)))
dat
#         m All  grp
# 1       7  94  red
# 2  12 PCA  95  red
# 3      21  96  red
# 4  24 PCA  95  red
# 5  31 PCA  94  red
# 6      38  95  red
# 7      70  96  red
# 8       7  74 blue
# 9  12 PCA  67 blue
# 10     21  74 blue
# 11 24 PCA  67 blue
# 12 31 PCA  68 blue
# 13     38  73 blue
# 14     70  74 blue

地块代码：

library(ggplot2)
ggplot(dat, aes(m, All, group=grp, color=grp)) + 
  geom_point() + 
  geom_line() + 
  scale_color_manual(values = c(blue = "blue", red = "red"))

赞(0）回复(0）举报 2022-12-06

我来回答

R语言在ggplot中用一条线连接红点

1条答案

相关问题

热门标签

最新问答

R语言 在ggplot中用一条线连接红点

1条答案

相关问题

热门标签

最新问答

R语言在ggplot中用一条线连接红点