xts 对象在子集时丢失 xts 类

Question

考虑以下内容。

junk1.xts <- xts(c(0:10), as.yearqtr("1975 Q1") + 0.25*(0:10))
junk2.xts <- xts(c(30:0), as.yearqtr("1970 Q1") + 0.25*(0:30))
junk2a.xts <- junk2.xts[index(junk1.xts),]
class(junk1.xts)
class(junk2.xts)
class(junk2a.xts)

前两个类语句导致：

[1] "xts" "zoo"

但第三个结果是：

[1] "zoo"

为什么？这是正常的还是错误的？防止它并为第三个对象保留 xts 类的最佳方法是什么？

Answer 1

我想我找到了问题所在。我正在尝试向 xts 对象添加一种以 Hmisc 为模型的标签功能。为此，我为[.xts 定义了一个函数。它最初是有效的，但后来我做了一些效率上的改变。其中一个破坏了函数。

抱歉给您带来不便。