将ggplot标题放在图表的右上角

Question

我正在使用ggplot0.9.3中的优秀theme_minimal()，它具有白色背景。我想把我的情节标题放在情节右上角的自定义位置。在以下示例中，我知道x和y值，但我想知道是否有办法传递xmax和ymax值以确保文本位于顶部-对。理想情况下，文本是正确的。

#example plot
p <- qplot(mpg, wt, data = mtcars, colour = cyl)
p +  annotate("text", x = 30, y = 5, label = "Custom Title")

#what I would like
p + annotate("text", y= ymax, x =xmax_or_RightJustified)

Answer 1

你可以做到

p + annotate("text",  x=Inf, y = Inf, label = "Some text", vjust=1, hjust=1)

Answer 2

您可以在max()中使用功能min()和annotate()，然后添加hjust=1以确保将文字放置在绘图内（对齐）。

p + annotate("text", y= max(mtcars$wt), x =max(mtcars$mpg),label="Custom Title",hjust=1)