Невозможно создать вертикальные этикетки с помощью 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)