请尝试以下代码:
library(quantmod)
getSymbols('SPY', from = '1950-01-01')
SPY <- to.monthly(SPY)
temp <- xts(Cl(SPY), index(SPY))
Run Code Online (Sandbox Code Playgroud)
您将获得一个xts具有相同长度Cl(SPY)和相同日期的对象......或者应该如此.
如果你输入
merge(Cl(SPY), temp)
Run Code Online (Sandbox Code Playgroud)
你会看到,虽然Cl(SPY)并temp具有相同的索引到目前为止,他们没有对齐,代码生成双打和很多NA秒.
我怎样才能以正确的方式合并它们?
我的问题:
Amat <- diag(4)
Run Code Online (Sandbox Code Playgroud)
我想,以取代所有的下三角值Amat(即Amat[2,1],Amat[3,1],Amat[3,2],等),用一个值我选择(例如NA).
显然我不想逐个替换每个元素.
你能用一个命令告诉我最有效的方法吗?