No way to make legend order exactly match bar order in relative stacked bar plot

Sometimes we want to plot negative values below x axis in a stacked bar plot. This can be done with barmode as "relative".

Further, I want to make the legend order exactly match the bar order in plot. However the positive bars stack from middle to top, negative bars stack from middle to down, thus no matter how I arrange the variable levels, there is no way to make the legend order exactly match bar order.

library(plotly)
library(data.table)

set.seed(42)
dt_test <- data.table(x = rep(1:5, each = 6), variable = rep(letters[1:6], 5), value = sample(10:40, 30))
dt_test[variable %in% letters[3:5], value := -value]

dt_test[, variable := factor(variable, levels = c("c", "d", "e", "a", "b", "f"))]

plot_ly(dt_test) %>% 
  add_bars(x = ~x, y = ~value, color = ~variable) %>%
  layout(barmode = 'relative', legend = list(traceorder = "reversed"))

I'm not sure how this can be done, unless we

• change the stack order in negative part as bottom up
• or can arrange legend order freely without changing bar stack order

まず、plot_ly()、add_bars()、barmode = "relative"、および現在の凡例設定を使用して、提供された R の例を再現します。負のスタックと正のスタックで要求された動作をサポートできるか調査します。凡例の順序が表示されるバーの順序と完全に一致するか、または制限事項と選択した順序動作が文書化されれば完了です。