用於情節r燭台圖表的懸停文本

Question

我正在嘗試使用燭台圖來表示模型輸出。 因此，我試圖在圖表中使用candelstick圖表繪制實際的，建模的，上限和下限值。 根據情節r的給定示例，懸停總是顯示打開，關閉，高，低。 我可以將此懸停文本更改為自定義文本。 謝謝。

library(plotly)
library(quantmod)

getSymbols("AAPL",src='yahoo')

# basic example of ohlc charts
df <- data.frame(Date=index(AAPL),coredata(AAPL))
df <- tail(df, 30)

p <- df %>%
  plot_ly(x = ~Date, type="candlestick",
          open = ~AAPL.Open, close = ~AAPL.Close,
          high = ~AAPL.High, low = ~AAPL.Low) %>%
  layout(title = "Basic Candlestick Chart")

Answer 1

這是個有趣的問題。
在這里，我嘗試使用以下代碼自定義燭台圖表的懸停文本：

p <- df %>%
  plot_ly(x = ~Date, type="candlestick",
          open = ~AAPL.Open, close = ~AAPL.Close,
          high = ~AAPL.High, low = ~AAPL.Low,
          text = paste("Text1:",df$AAPL.Open,"<br>Text2:",df$AAPL.Close),
          hoverinfo='text') %>%
  layout(title = "Basic Candlestick Chart")

使用我的plotly_4.8.0.9000我得到一個燭台圖表，但沒有懸停文本出現。
使用plotly_json可以檢查發送到plotly.js的JSON。
hoverinfo屬性應設置為'text'但在data -> 0 -> hoverinfo可以看到它包含一個字符串'text'數組。

一個可能的解決方案是手動將hoverinfo設置為'text' ：

pltyobj <- plotly_build(p)
pltyobj$x$data[[1]]$hoverinfo <- "text"
pltyobj