情節酒吧和折線圖

Question

我想用曲線繪制一個條形圖和R中的折線圖。

我的第一次嘗試是

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')
)

結果是對的，但我得到以下警告：

警告消息：以下屬性不存在：'mode'，'line'

我猜因為add_trace()中的add_trace()無法處理plot_ly()函數中的line和mode參數。 所以我改變了順序：

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')
)

這次我得到以下消息，黑色折線圖上顯示紅色標記。

已指定標記對象，但標記不在模式中添加標記...

我怎樣才能解決這個問題？ （我正在使用R封裝4.1.0 ）

Answer 1

我正在運行4.0.2，但是如果我添加mode='lines+markers'而不僅僅是mode='lines'那么錯誤信息就會消失。

--edit添加完整代碼 -

對於懶惰（像我一樣），這里是我的最終完整代碼：

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')
     )