R erstellen von XTS-Objekt unter Verwendung der Zeit-string
Ich möchte erstellen Sie eine xts
Objekt, anhand der folgenden Daten-frame. Ich verstehe da dies eine Kombination von Faktoren und Kombination der numerischen Werte, die Sie nicht in einem einzigen xts
Objekt. Ich bin froh, erstellen Sie separate Objekte mit Gruppierung erfolgt nur nach Zeit (ok, zu verlassen, dem Datum für den moment).
date extime sym price size notional ex
1 2014-06-30 08:00:05.330 RRS.L 4895 2 9790 XLON
2 2014-06-30 08:00:09.101 RRS.L 4893 23 112539 XLON
3 2014-06-30 08:00:10.257 RRS.L 4893 119 582267 XLON
4 2014-06-30 08:00:12.575 RRS.L 4892 128 626176 XLON
xts(testData$price, sapply(testData$extime, function(df) as.POSIXct((getNumericTim(df) +0.1)/1000, origin = "2014-06-30"),simplify=FALSE))
# Error in xts(testData$price, sapply(testData$extime, function(df) as.POSIXct((getNumericTime(df) + :
# order.by requires an appropriate time-based object
getNumericTime
function (x){
options(digits.secs=3)
data <- strptime(x,format="%H:%M:%OS")
hr <- as.numeric(strftime(data,"%H"))
mins <- as.numeric(strftime(data,"%M"))
secs <- as.numeric(strftime(data,"%OS"))
(((hr*(60)+mins)*60)+secs)*1000
}
Ich weiß, die sapply
rufen Sie zurück POSIXct
Objekt
sapply(testData$extime,function(df)as.POSIXct((getNumericTime(df)+0.1)/1000, origin = "2014-06-30"),simplify=FALSE)
[[1]]
[1] "2014-06-30 09:00:05.330 BST"
[[2]]
[1] "2014-06-30 09:00:09.101 BST"
[[3]]
[1] "2014-06-30 09:00:10.257 BST"
[[4]]
[1] "2014-06-30 09:00:12.575 BST"
Etwas falsch mit meinem xts
Objekt erstellen ?
- Die
sapply
rufen nicht zurück, wird einPOSIXct
Objekt. Es gibt eine Liste vonPOSIXct
Objekte.
Du musst angemeldet sein, um einen Kommentar abzugeben.
Können Sie erstellen Sie Ihre
order.by
Vektor so statt:Erstellen Sie dann
xts
Objekt:Wenn Sie wollen, um die Sekundenbruchteile: