我试图在一个传奇面前删除小a,但没有任何运气。其他可能性是在图表旁边创建一个图例或文字,但我的想法已经不多了。也许有人可以帮助我。
我在特定位置上绘制一个红色的X,我想指出,X标记的东西是假定的......
df <- data.frame(x=rnorm(10),y=rnorm(10))
ggplot(df, aes(x=x, y=y)) + geom_point() + geom_text(aes(x=0,y=0, color=factor(1)), label='X') +
scale_color_manual(values = 'red', name='imputed',labels='imputed') +
theme(legend.key=element_blank(), legend.title=element_blank())
我认为最好的结果是用X替换小a。但我找不到任何解决方案。
答案 0 :(得分:7)
问题是您使用geom_text
绘制十字架。
解决问题的一种简单方法是使用geom_point
绘制十字架:
ggplot(df, aes(x=x, y=y)) + geom_point() + geom_point(aes(x=0,y=0, color=factor(1)), shape='X', size=5) +
scale_color_manual(values = 'red',labels='imputed') +
theme(legend.key=element_blank(), legend.title=element_blank())