12

如果我使用\nwithlabs(title="whatever \n comes after this")我最终会在线条之间留出相当大的空间。有没有办法影响它?(我的意思是标题本身的字体大小除外)。

4

2 回答 2

13

你可以做这样的事情(选项lineheight来修改行距)

  p <- qplot(mpg, wt, data = mtcars)
  p <- p + ggtitle("whatever \n comes after this") + 
  theme(plot.title = element_text(lineheight=.1))
  p
于 2012-11-22T11:05:01.937 回答
1

要使所有内容完美居中(\n在某些情况下不会这样做),请保持每段文本的大小相同,或者如果有超过 2 行(这在某些情况下很有用),则能够相对调整它(这在某些情况下很有用),同时能够调整行间距,请改用:

labs(title=expression(atop(textstyle("whateverline1"),atop(textstyle("whateverline2"),atop(scriptscriptstyle(""),textstyle("whateverline3"))))))

然后使用labeller=label_parsed

这也适用于facet_grid,xlabylab

注意atoptextstyle来定位文本,同时保持所有相同的大小和scriptscriptstyle("")控制行间距。您还可以使用scriptstylescriptscriptstyle根据您的需要使用不同的相对大小的文本

于 2018-02-20T17:52:14.170 回答