如何使R密谋用逗号分隔成千上万？

Question

一千个逗号不会加载

使用秤库-标签=逗号

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

没有错误消息，但逗号未应用。