r - 动物园警告：要替换的项目数不是替换长度的倍数

Question

我是 zoo 的新用户，并试图获取 zoo 对象中两个元素的最小值，并将其分配给其中一个。我收到以下错误消息。请帮忙解决一些问题。

library("tseries")
IBM <- get.hist.quote(instrument="IBM", start="2012-01-01", end="2012-12-31")
IBM[1]$Low <- min( IBM[1]$Low , IBM[2]$Low )
Warning message:
In NextMethod("[<-") :
  number of items to replace is not a multiple of replacement length

Answer 1

这是一个警告，而不是错误；这是由您进行子集化的特殊方式引起的。我从来没有见过有人先按行子集，然后按列使用该$函数。我建议您$先按列进行子集化，然后再按行进行子集化。

这可以在没有警告的情况下工作：

IBM$Low[1] <- min(IBM$Low[1:2])