子集化时,xts对象会丢失xts类

时间:2017-03-07 12:18:23

标签: r subset xts

请考虑以下事项。

window.addEventListener('load', function() {
    document.getElementById("myBtn").addEventListener("click", function() {

      var reader = new FileReader();
      reader.addEventListener('load', function() {
        document.getElementById('file').innerText = this.result;
      });
      reader.readAsText(document.querySelector('input').files[0]);
    });
}, true);

前两个类语句导致:

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"

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

1 个答案:

答案 0 :(得分:0)

我想我发现了这个问题。我试图添加一个标签功能,模仿Hmisc中的标签功能到xts对象。在这样做时,我为[.xts定义了一个函数。它起初工作,但后来我做了一些效率改变。其中一人打破了这个职能。

很抱歉给您带来不便。