无法使用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)