将光标悬停在烛台图上的文本

Question

我正在尝试使用烛台图表示模型输出。因此，我尝试使用candelstick图表在绘图中绘制实际值，模型值以及上限值和下限值。根据给定的示例r，悬停始终显示为open，close，high，low。我可以将此悬停文本更改为自定义文本。谢谢。

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