我有一个散点图,按类别将点分成不同的颜色。我希望这些类别之一的线之间连接点以突出显示该类别的数据。我在解决这个问题上遇到了麻烦...

Round <- read.csv("http://goo.gl/3c3vBU") # Data

qplot(factor(Round), Opp.Landed, data=floyd, color=Opponent, size=Opp.Percent.Landed, alpha = I(0.7)) +
  labs(x="Round", y="Punches Landed", title="Opponent Punches Landed / Percentage", colour="Boxer", size="Connect Percentage") +
  scale_linetype_manual(values=1:2, labels=c("Boxer", "Connect Percentage")) +
  guides(colour = guide_legend(override.aes = list(size=5)))
ftheme代码只是颜色和格式。有任何想法吗?我试过添加geom_line(aes(linetype=floyd[Opponent="Manny Pacquiao"]), size=1),但出现错误
Error in [.data.frame`(floyd, Opponent = "Manny Pacquiao") :    unused argument (Opponent = "Manny Pacquiao")

编辑:我已经更新了上面的代码以排除ftheme,所以它是可重现的。请查看来自三个类别的样本数据集。我只希望其中任何一个具有连接点:http://goo.gl/3c3vBU

最佳答案

尝试添加:

 geom_line(data=subset(floyd,Opponent=="Manny Pacquiao"), aes(factor(Round), Opp.Landed, group=Opponent), size = 2)

非常简单的一段代码,使您的数据的一个子集在您的数据点中的大小为2。

(对于该图片,我使用了对手Miguel Cotto,因为您未在数据集中提供Manny Pacquiao)

09-30 16:58