R 向ggplot中的各个面添加文本

R 向ggplot中的各个面添加文本,r,ggplot2,R,Ggplot2,我想知道我是如何把不同的文本放在不同的方面的。我想在绘图中添加文本,使用注释或geom_文本。我知道这里面有重复的帖子,但我无法使其正确。以下是我的数据: Experiment FC Pairing Meister et al. -2.74236520 yes Meister et al. -0.7436354 no Meister et al. -2.74236520 yes Meister et al. -0.7353635

我想知道我是如何把不同的文本放在不同的方面的。我想在绘图中添加文本,使用注释或geom_文本。我知道这里面有重复的帖子,但我无法使其正确。以下是我的数据:

Experiment         FC           Pairing
Meister et al. -2.74236520      yes
Meister et al. -0.7436354       no
Meister et al. -2.74236520      yes
Meister et al. -0.73536354      no
daub et al.    -0.64246768      yes
daub et al.    -0.6663321       no
daub et al.    -0.64246768      yes
daub et al.    -0.6663321       no
hans et al.    -2.32230716      yes
hans et al.    -0.49423279      no
hans et al.    -2.32723716      yes
hans et al.    -0.4944279       no

ggplot(combined_pos1,aes(Pairing,FC,fill=as.factor(Pairing))) + 
      geom_boxplot(fill = "grey90") +  coord_cartesian(ylim=c(-3,3)) + 
      facet_grid(~Experiment)

在这里为每个方面创建注释,作为Meister和Hans的示例:

combined_pos1$annotations = c("Text for Meister",rep("",10),"Text for hans")
包括几何图形文本:

g = ggplot(combined_pos1,aes(Pairing,FC,fill=as.factor(Pairing))) + geom_boxplot(fill = "grey90") +  coord_cartesian(ylim=c(-3,3)) + facet_grid(~Experiment)
g = g + geom_text(aes(x=2.5,y=2.5,label=annotations))
g
这将产生以下结果:

您是否尝试过这种方法?您是说您想更改当前显示为Meister et al.,Daub et al.,等的每个方面的条形标签中的文字。,或者你是说你想在每个方面的绘图区域内放置文本注释?建议:使用dput@eipi10是,我想在绘图中添加文本作为注释。每个方面都有一个唯一的文本。@BioMan这是一个清晰的副本,答案是在注释中给你的,但你没有阅读。@baptiste如果我在注释中遗漏了什么,很抱歉。如果你想在多行中添加文本,请确保text data.frame中的colname与你要打印的数据相匹配。