r - plotly 条形图和折线图

Question

我想在 R 中用 plotly 绘制一个条形图和一个折线图。

我的第一次尝试是

p <- plot_ly(
  x = c(1,2,3,4,5),
  y = c(1,2,1.5,3,2),
  type='scatter',
  mode='lines',
  line = list(color = 'black')
)
add_trace(
  p,
  x = c(1,2,3,4,5),
  y = c(0.5,0.7,0.6,0.9,0.8),
  type='bar',
  marker = list(color = 'red')
)

结果是正确的，但我收到以下警告:

Warning message: The following attributes don't exist: 'mode', 'line'

我猜是因为 add_trace() 中的条形图无法处理 line和 mode来自 plot_ly() 的参数功能。所以我改变了顺序:

p <- plot_ly(
  x = c(1,2,3,4,5),
  y = c(0.5,0.7,0.6,0.9,0.8),
  type='bar',
  marker = list(color = 'red')
)
add_trace(
  p,
  x = c(1,2,3,4,5),
  y = c(1,2,1.5,3,2),
  type='scatter',
  mode='lines',
  line = list(color = 'black')
)

这次我收到以下消息，黑色折线图上显示红色标记。

A marker object has been specified, but markers is not in the mode Adding markers to the mode...

我怎样才能解决这个问题？ (我正在使用 R 包 plotly 4.1.0)

Answer 1

我正在运行 4.0.1，但如果我添加 mode='lines+markers'而不仅仅是 mode='lines'错误信息对我来说消失了。

--编辑以添加完整代码--

对于懒惰的人(像我一样)，这是对我有用的完整代码:

p <- plot_ly(x = c(1,2,3,4,5),
             y = c(0.5,0.7,0.6,0.9,0.8),
             type='bar',
             marker = list(color = 'red', opacity=0)
     )

add_trace(p,
          x = c(1,2,3,4,5),
          y = c(1,2,1.5,3,2),
          type='scatter',
          mode='lines+markers',
          line = list(color = 'black')
     )