XTS-Objekte verlieren die XTS-Klasse, wenn sie untergeordnet werden

Question

Betrachten Sie Folgendes.

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) 

Die ersten beiden Klassen Aussagen ergeben:

[1] "xts" "zoo" 

aber die dritten Ergebnisse in:

[1] "zoo" 

Warum? Ist das normal oder ein Fehler? Was ist der beste Weg, dies zu verhindern und die xts-Klasse für das dritte Objekt zu erhalten?

Answer 1

Ich glaube, ich habe das Problem gefunden. Ich versuche, XTS-Objekte eine Beschriftungsfunktion hinzuzufügen, die dem in Hmisc nachempfunden ist. Dabei hatte ich eine Funktion für [.xts definiert. Es hat anfangs funktioniert, aber dann habe ich einige Effizienzänderungen vorgenommen. Einer von ihnen hat die Funktion gebrochen.

Entschuldigung für etwaige Unannehmlichkeiten.