ggplot删除或替换' a'在geom_text传说中

时间:2014-11-13 13:23:22

标签: r ggplot2

我试图在一个传奇面前删除小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。但我找不到任何解决方案。

1 个答案:

答案 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())