如何在不混合系列的情况下创建子图？

Question

在 R

中使用 plotly

packageVersion('plotly')
[1] ‘4.8.0’

具有以下数据框

  datetime                   error.code
1 2018-05-07 11:34:34        433
2 2018-05-07 11:40:32        433
3 2018-05-08 07:38:22        124
4 2018-05-08 08:20:41        310
5 2018-05-08 08:21:40        122
6 2018-05-08 08:27:42        115
...

通过绘制：

 test.data %>%
      plot_ly(x = ~datetime, y = 1, color = ~as.character(error.code),colors='Dark2',
              yaxis = ~paste0("y", error.code)) %>%
       layout(
        title = "Error Codes",
        yaxis=ax)  %>%
      add_markers() %>%
      subplot(shareX=TRUE,nrows=14)

我得到：

我无法弄清楚为什么将错误代码混在一起（例如第二行），以及为什么没有考虑 nrows参数。

使用其他方法时：

test.data %>%
  group_by(error.code) %>%
  do(p = plot_ly(., x = ~datetime, y = 1, name=~as.character(error.code)) %>% layout(
    title = "Error Codes",
    yaxis=ax) %>% add_markers()) %>%
  subplot(nrows = NROW(.), shareX = TRUE) 

我无法调整调色板。