r - 在 quantmod 中更新历史价格

Question

Quantmod 的 getSymbols() 获取截至昨天收盘的历史价格。我在早上进行分析，并想用当前报价更新系列(我只使用调整后的价格)。我似乎无法让它工作。当我使用这段代码时:

getSymbols('AGNC')
q <- getQuote('AGNC')
d <- Sys.Date()
qq<- q$Last
x <- zoo(qq,d)
t <- rbind.zoo(Ad(AGNC), x)
print(tail(t))

它打印出来是好的，但是当我尝试做进一步的事情时，比如:

dum <- dailyReturn(t)

我收到以下错误:

错误 colnames<- (*tmp*，值 =“daily.returns”): 尝试在小于两个维度的对象上设置 colnames

有什么想法吗？

Answer 1

library(quantmod)
getSymbols('AGNC')
q <- getQuote('AGNC')
d <- Sys.Date()
qq<- q$Last
x <- xts(qq,d)
t <- rbind(Ad(AGNC), x)
print(tail(t))
dailyReturn(t)