如何在R中的xts對象中為日期分配值

Question

我假設以下代碼

date = as.Date('2015-05-30')
timeseries = xts()
timeseries[date] = 1

應該為日期“ 2015-05-30”分配值1。 但是，這給了我一個錯誤

Error in xts(rep(NA, length(index(x))), index(x)) : 
  order.by requires an appropriate time-based object

將值分配給空的xts對象的正確方法是什么？

謝謝，弗拉基米爾

Answer 1

嘗試這樣的事情：

d1 <- rep(1,21)
d2 <- seq(as.Date("2001-01-01",tz="GMT"),as.Date("2021-01-01",tz="GMT"),length.out=21)
xtsdat <- as.xts(d1,d2)

如果需要逐行構建，則以這種方式構建各個向量，並在最后形成xts。

Answer 2

我認為您誤解了[<-.xts函數的目的。 您要求將日期"2015-05-30"的值替換為1 ，但是您的xts對象沒有數據，因此沒有任何替換內容。 您實際上想完成什么？

如果要插入，則應調用rbind(xts(1, as.Date('2015-05-30')), timeseries) 。

---

而且，您應該聽從Mike Wise的明智建議 ：生長這樣的物體效率很低。