r - 在Quantmod中更新历史价格

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”):
尝试在尺寸小于二维的对象上设置别名

有任何想法吗？

最佳答案

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)