Выравнивание текста на гистограмме ggplot2

df.test <- data.frame(val=c(0.55,0.42,-0.05),name=letters[1:3],
desc='This is     the description of values'

p <- ggplot(df.test, aes(name, val, label = desc)) +
    geom_bar(stat = "identity", col = 'black', fill = 'lightgreen') + 
    labs(title = "Test", x = " ", y = "value", fill = "") + 
    theme_bw() + 
    guides(fill = FALSE)

p + geom_text(angle = 90, size = 8, hjust = 1.25, position = position_dodge(width = 0.9))

Это генерирует следующий сюжет:

введите описание изображения здесь

Я хочу выровнять текст и заставить его начинаться с начала каждой диаграммы, чтобы все они были видны (это нормально, если он выходит за пределы небольшой диаграммы). Как я могу этого добиться?


r bar-chart ggplot2 geom-text
person H_A    schedule 27.10.2016    source источник

Ответы (1)


arrow_upward
2
arrow_downward

Это то, что вы ищете?

   p <- ggplot(df.test,aes(name,val,label=desc))+
      geom_bar(stat="identity",col='black',fill='lightgreen')+ 
      labs(title = "Test", x = " ", y = "value",fill = "")+
      theme_bw()+
      guides(fill=FALSE)
    p+geom_text(angle=90,size=8,hjust=0,aes(x=name,y=rep(0,nrow(df.test)),label=desc),inherit.aes=F)

введите описание изображения здесь

person Haboryme    schedule 27.10.2016