r - 在 Plotly 和 R 中以红色显示底片

Question

我想将底片显示为红色

试图在网上寻找解决方案，但没有找到

plot_ly(x = ecomm_yoy2$YOY, y = ecomm_yoy2$Brand, type = 'bar', orientation = 'h') %>%
  layout(xaxis = list(title = "% YOY change in £ for June", dtick = 10)) %>% 
  layout(yaxis = list(categoryorder = "array", categoryarray = ecomm_yoy2$YOY)) %>%
  add_annotations(text = ecomm_yoy2$YOY, showarrow = F, xshift = 25)

目前只显示蓝色

标签： rplotly

Answer 1

这是使用 plotlycolor和colors参数的可能解决方案：

ecomm_yoy2 <- data.frame(YOY = -19:20, Brand = 1:40)

plot_ly(ecomm_yoy2, x = ~YOY, y = ~Brand, type = 'bar', orientation = 'h', color = ~YOY < 0, colors = c("chartreuse3", "red"), name = ~ifelse(YOY < 0, "< 0", ">= 0")) %>%
  layout(xaxis = list(title = "% YOY change in £ for June", dtick = 10)) %>% 
  layout(yaxis = list(categoryorder = "array", categoryarray = ~YOY)) %>%
  add_annotations(text = ~YOY, showarrow = F, xshift = 25)

你可能想看看：

library(plotly)
library(listviewer)
schema(jsonedit = interactive())

这让您可以浏览 plotly 的可用跟踪及其参数。