Question

似乎标题周围有一些填充物，我无法弄清楚如何改变，有什么想法？

xy <- data.frame(x=1:10, y=10:1)
plot <- ggplot(data = xy)+ geom_point(aes(x = x, y =  y))
plot <- plot + opts(plot.background = theme_rect(colour = 'purple', fill = 'pink', size = 3, linetype='dashed'))
plot
plot + opts(title = 'Graph Title')
plot

如果你运行这个，在屏幕上拿一张纸（老学校，我知道）与标题中的G和T顶部对齐，然后再次运行情节，你会看到你有一些你纸上面的灰色。我只能假设这标志着标题周围的一些填充？或者同样地，如果你在没有标题的情况下运行它并将纸张（上方）与粉红色背景的末端保持一致，则使用标题运行它，G和T的顶部位于纸张下方。

示例主要来自https://github.com/hadley/ggplot2/wiki/Graph-Panel-Attributes

这表明有一个行高选项但它似乎什么都不做http://www.inside-r.org/packages/cran/ggplot2/docs/theme_text

Answer 1

所以这是一个黑客：

p <- plot + opts(title = 'Graph Title')
p <- ggplot_gtable(ggplot_build(p))
p$heights[[2]] <- p$heights[[2]]-unit(0.5, "lines")
grid.draw(p)

此代码删除填充。

但我建议发送功能请求：https://github.com/hadley/ggplot2/issues?milestone=

ggplot2标题填充？如何调整？

1 个答案: