ggplot2加注释

借用之前的iris的例子，如果想在图上直接加上文本，实现这样的效果：

annotate

其实在原图层的基础上加上annotate()即可：

代码语言：javascript复制

library(ggplot2)
data("iris")
p <- ggplot(data = iris, aes(x = Sepal.Width, y = Petal.Width,  color = Species))   
geom_point()   geom_smooth(method = lm)  
scale_color_manual(values = c('#FF7400', '#009999', '#3914AF'))   
labs(title = 'iris')   guides(color=FALSE)   
theme_bw()   theme(plot.title = element_text(hjust = 0.5))

p   annotate("text",x = c(4.0, 3.0, 2.25), y = c(0.7, 0.9, 2.25), label = c('setsosa', 'versicolor', 'virginica'), size = 5, colour = c('#FF7400', '#009999', '#3914AF'))

x和y指定文本x轴和y轴的位置； label设定该位置的文本内容； size为字体大小； colour指定字体颜色。

欢迎关注微信公众号～

生信编程日常

label size 编程 基础 微信公众号

0 人点赞