R ggplot在绘图上方添加文本

我的数据由变量

log R ratio

、

sample\u id

和

replicate

组成。 我用ggplot做了一个箱线图

replicate_to_R$replicate <-factor(replicate_to_R$replicate, levels=c( "3", "4", "8","12" ), labels=c("3", "4", "8","12"))

replicate_to_R$sample_id <-factor(replicate_to_R$sample_id, levels=c(74,76,78,79,80), labels=c(18,20,22,23,24))
# boxplot
ggplot(aes(y=logRratio, x=sample_id, fill=replicate), data=replicate_to_R) + 
geom_boxplot(outlier.shape=NA) + scale_y_continuous(limits=c(-1,1)) + 
scale_fill_manual(values=c("steelblue4","steelblue3","steelblue2","steelblue1")) + theme(panel.grid.major.x =element_blank()) + 
theme(panel.background = element_blank()) + 
theme(axis.text = element_text(size=14, color="black")) 

---

replicate\u to\u R$replicate
ggplot2
图形使用
grid
图形系统，因此您可以使用
grid
功能对其进行注释：

library("grid")
grid.text("my text", x = 0.5, y = 0.5)

将文本置于图形窗口的死点。有关坐标系的详细信息，请参见加载包后的
？grid.text
，但基本上，默认系统是相对于整个图形窗口的。
对此可能非常有用。再者，一杯咖啡也不错