如何只旋转ggplot中注释中的文本？

Question

我有一个这样的情节：

fake = data.frame(x=rnorm(100), y=rnorm(100))

ggplot(data=fake, aes(x=x, y=y)) + geom_point() + theme_bw() +
  geom_vline(xintercept=-1, linetype=2, color="red") +
  annotate("text", x=-1, y=-1, label="Helpful annotation", color="red")

如何将带注释的文本旋转90度，使其与参考线平行？

Answer 1

告诉它你想要的角度。

ggplot(data = fake, aes(x = x, y = y)) + 
    geom_point() +
    theme_bw() +
    geom_vline(xintercept = -1, linetype = 2, color = "red") +
    annotate(geom = "text", x = -1, y = -1, label = "Helpful annotation", color = "red",
             angle = 90)

在?geom_text中，您可以看到angle是一种可能的美学，而annotate会传递它，就像任何其他参数geom_text所理解的那样（例如{已使用{1}}，x，y和label。