r - 无法使用 ggplot 创建垂直标签

Question

使用以下代码，我可以使用 geom_text 获取标签，但它们不是垂直的，即使在我将角度更改为 90 后也是如此。

 p1 <- ggplot(segment(p)) +
         geom_segment(aes(x=x,y=y,xend=xend,yend=yend),colour="blue") + labs(y = "Label y") +
         theme_classic()+theme(axis.line.x=element_blank(), axis.text.x=element_blank(), axis.ticks.x=element_blank(),axis.title.x=element_blank()) + 
         geom_text(data=leaf_label_data, aes(x=xend, y=yend,label=label,angle = 90))

Answer 1

您将 angle = 90 添加到 aes() 中，但这并不美观。只需将其移出 aes 即可正常工作。

一个简单的例子:

ggplot(df, aes(x = x, y = y)) + 
  geom_point() +
  geom_text(aes(label = label), angle = 90, hjust = -0.1)