使用以下代码,我可以使用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))
答案 0 :(得分:2)
您已将angle = 90
添加到aes()
,但这并不美观。只需将其从aes
移出即可。
一个简单的例子:
ggplot(df, aes(x = x, y = y)) +
geom_point() +
geom_text(aes(label = label), angle = 90, hjust = -0.1)