Trier diagramme à barres verticales par fréquence

Question

Je souhaite trier un graphique à barres vertical basé sur le niveau de la variable quantitative sur l'axe des x.

exemple Reproductible:

library(plotly) 
library(dplyr) 

df <- data.frame(a = c(1000,100,500,1), b = c('blue', 'green', 'yellow', 'red')) 

plot_ly(
    data = df, 
    x = ~a, 
    y = ~b, 
    type = 'bar', 
    orientation = 'h' 
) %>% 
    layout(
     yaxis = list(
      categoryorder = "array", 
      categoryarray = ~a 
      ) 
     ) 

Je veux un graphique à barres verticales où l'ordre sur l'axe y est en bas: « bleu », « jaune », « vert » et « rouge ». J'ai lu à propos de categoryorder, qui semblait une bonne solution, mais d'une manière ou d'une autre, ça ne marche pas dans la pratique.

Answer 1

Option 1

library(plotly) 
library(dplyr) 

df <- data.frame(a = c(1000,100,500,1), b = c('blue', 'green', 'yellow', 'red')) 
df$b = factor(df$b,levels =c("red","green","yellow", "blue")) 

plot_ly(
    data = df, 
    x = ~a, 
    y = ~b, 
    type = 'bar', 
    orientation = 'h' 
) 

Option 2

library(plotly) 
library(dplyr) 

df <- data.frame(a = c(1000,100,500,1), b = c('blue', 'green', 'yellow', 'red')) 

plot_ly(
    data = df, 
    x = ~a, 
    y = ~b, 
    type = 'bar', 
    orientation = 'h' 
) %>% 
    layout(
    yaxis = list(
     categoryorder = "array", 
     categoryarray = ~c("red","green","yellow", "blue")) 
    ) 
) 

Hope this helps!