如何在 dygraphs [r] 中绘制烛台 + 滚轮

【问题标题】：how to plot candlestick + roller in dygraphs [r]如何在 dygraphs [r] 中绘制烛台 + 滚轮
【发布时间】：2018-12-16 13:45:06
【问题描述】：

您好，我尝试绘制烛台图 + 滚动平均线。

library(xts)
library(dygraphs)
data(sample_matrix)
m <- tail(sample_matrix, n = 32)

dygraph(m) %>% 
    dyCandlestick() %>% 
    dyRoller(showRoller = T, rollPeriod = 5)

产生这个：

我想要的是烛台图+滚筒平均线，像这样：

【问题讨论】：

标签： dygraphs r-dygraphs

【解决方案1】：

dyRoller 是添加到图表中的滚动平均周期文本框。你想要的是收盘价的移动平均线。这是示例代码。函数 TTR::SMA (quantmod) 可以替换为 forecast::ma。

library(dygraphs); library(xts); library(quantmod)
data(sample_matrix)
m <- tail(sample_matrix, n=75)
m <- cbind(m, SMA(m[,4], n=10))
m <- cbind(m, SMA(m[,4], n=20))
colnames(m)[5:6] <- c('SMA10','SMA20')
dygraph(m) %>% 
  dyCandlestick()

【讨论】：