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