使用end（）返回xts对象的最后日期

Question

我正在使用吸墨纸和相关包来创建一个小型投资组合。这些包依赖于来自雅虎的数据。此外，它们在内部使用xts，但不知何故xts对象上的函数不起作用并返回所需的结果。当然，这需要更改内部功能，只需将end()替换为max(index())等工作电话。

library(quantmod)
library(xts)
getSymbols("LGQM.DE", from="2017-01-01", to=Sys.Date(), src='yahoo',
          auto.assign = TRUE, adjust = TRUE)

str(LGQM.DE)
end(LGQM.DE)

max(index(LGQM.DE))

可以看出，执行此代码时，end（）函数只返回一个空日期值，尽管日期存储正确，如检查max(index(LGQM.DE))的结果时可以看到的那样。 这些包是使用devtools从github安装的，我在安装后重新启动了R会话。