[英]subsetting values in a zoo with multiple time-series (columns)
我正在尝试在多列动物园中将 -Inf 替换为 NA 。 但是,当我尝试对动物园 object 中的 -Inf 值进行子集化时,就像我对矩阵所做的那样,它不起作用,因此无法进行替换:
library(zoo)
mat = matrix(1:50, ncol = 5)
mat[2,5]=-Inf
mat[8,3]=-Inf
colnames(mat) = letters[1:5]
z = as.zoo(mat)
mat[is.infinite(mat)] = NA
mat
z[is.infinite(z)]= NA
z
我可以用循环来做到这一点,但似乎没有必要为如此基本的事情使用循环。
逻辑下标将引用索引。 而是这样做:
z[] <- ifelse(is.infinite(z), NA, z)
或者,如果您想将其分配给不同的变量,则 rhs 将是:
z * ifelse(is.infinite(z), NA, 1)
这也有效:
coredata(z)[is.infinite(z)] <- NA
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.