r - 使用 R 的 dygraph 仅按年份绘制 xts 时间序列？

Question

我正在尝试使用 R 库的新 dygraph 来绘制每年波士顿马拉松赛中男性和女性的获胜时间。我有一个以秒为单位的获胜时间的数据框，这是其中的一部分:

winners <- data.frame(year=1966:1971, mensec=c(8231, 8145, 8537, 8029, 7830, 8325), womensec=c(12100, 12437, 12600, 12166, 11107, 11310))

但我不知道如何从中创建 xts 对象。我可以从每一列创建一个常规时间序列，并在单独的图表中使用 dygraph 绘制每个序列的图表

men <- ts(winners$mensec, frequency = 1, start=winners$year[1])
dygraph(men)
women <- ts(winners$womensec, frequency = 1, start=winners$year[1])
dygraph(women)

如果我尝试绑定(bind)时间序列，它将无法在 dygraph 中工作

both <- cbind(men, women)
dygraph(both)

错误信息是

xts(x.mat, order.by = order.by, 频率 = 频率(x), ...) 中的错误: NROW(x) 必须匹配 length(order.by)

有什么建议吗？谢谢

Answer 1

这看起来像是 as.xts.ts 中的错误。它使用 length(x) 为索引创建日期序列，该序列返回矩阵的元素数(而不是行数)。

您可以通过在 ts 对象上调用 cbind 之前使用 as.xts 来解决这个问题。

both <- cbind(men=as.xts(men), women=as.xts(women))