当标签出现在 y 条上时按字母顺序对标签进行排序

Question

对于下面的示例，我想知道当标签出现在 y 栏上时，我如何才能按字母顺序对其进行排序。

谢谢，

近海

# Create labels for plot
boxLabels = c("Package recommendation", "Breeder’s recommendations", "Vet’s 
recommendation", "Measuring cup", "Weigh on scales", "Certain number of 
cans", "Ad lib feeding", "Adjusted for body weight")

        df <- data.frame(yAxis = length(boxLabels):1,
      boxOdds = 
       c(2.23189,1.315737,1.22866,.8197413,.9802449,.9786673,.6559005,.5929812),
      boxCILow = 
       c(.7543566,1.016,.9674772,.6463458,.9643047,.864922,.4965308,.3572142),
      boxCIHigh = 
      c(6.603418,1.703902,1.560353,1.039654,.9964486,1.107371,.8664225,.9843584)
    )
    
    
    (p <- ggplot(df, aes(x = boxOdds, y = boxLabels)) +
      geom_vline(aes(xintercept = 1), size = .25, linetype = 'dashed') +
      geom_errorbarh(aes(xmax = boxCIHigh, xmin = boxCILow), size = .5, height = 
          .2, color = 'gray50') +
      geom_point(size = 3.5, color = 'orange') +
      theme_bw() +
      theme(panel.grid.minor = element_blank()) +
      scale_x_continuous(breaks = seq(0,7,1) ) +
      coord_trans(x = 'log10') +
      ylab('') +
      xlab('Odds ratio (log scale)') +
      annotate(geom = 'text', y =1.1, x = 3.5, label ='Model p < 0.001\nPseudo 
    R^2 = 0.10', size = 3.5, hjust = 0) + ggtitle('Intention to remove box 
    turtles from the road')
    )

Answer 1

值按字母顺序显示，但从下到上。要反转，您可以尝试使用 forcats 包中的 fct_rev：

用
替换y = boxLabels y = forcats::fct_rev(boxLabels)

当标签出现在 y 条上时按字母顺序对标签进行排序

sorting the labels alphabetically when they appear on the y bar

r

ggplot2