首页
学习
活动
专区
圈层
工具
发布
社区首页 >问答首页 >如何在图的底部添加注释?

如何在图的底部添加注释?
EN

Stack Overflow用户
提问于 2016-05-30 08:20:53
回答 2查看 599关注 0票数 1

基本上,我想在下面的图表中记录我的发现,比如“在2000到2006年间,病例增加了28%。”

我尝试过使用annotation_custom,但在facet_grid的情况下,它将它放在图形上的每个方面之下,而不是完全在图形区域之外。我还尝试在SO上使用其他搜索中的网格排列,但在我能看到的任何地方都没有文本显示。

代码语言:javascript
复制
library(ggplot2)
...
graph <- ggplot(data=dataSource, aes(x=factor(year), y=Cases, fill = type))
graph <- graph+geom_bar(stat="identity")+facet_grid(.~type) 
graph <- graph+labs(title="Some title here", x="Year", y="Cases by county", fill="Type")
print(graph)
EN

回答 2

Stack Overflow用户

发布于 2016-05-30 08:37:06

在cowplot包中使用add_sub。以下是help("add_sub")的示例部分中的第一个示例:

代码语言:javascript
复制
library(ggplot2)
library(cowplot)

p1 <- ggplot(mtcars, aes(mpg, disp)) + 
        geom_line(colour = "blue") + 
        background_grid(minor='none')
ggdraw(add_sub(p1, "This is an annotation.\nAnnotations can span multiple lines."))

票数 3
EN

Stack Overflow用户

发布于 2016-05-30 09:24:45

我不认为grid.arrange有什么问题

代码语言:javascript
复制
gridExtra::grid.arrange(ggplot(), bottom = "annotation here")

票数 0
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/37516177

复制
相关文章

相似问题

领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档