用于情节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