用 NA 替换数据

Replace Data with NA

fct<- function(x){volume03[[x]][which(is.na(last03[[x]]))]<- NA}
lapply(1:length(volume03, fct)

我想将 volume03 中的所有数字都设置为 NA,在 last03 中是 NA。然而,R 只返回一个 NA 列表。

为什么我要这样做:数据是库存数据(动物园系列)-

volume[[1]][1] 

第一天返回公司 1 的数据。部分数据为零,不应该这样

或者,您可以

for (i in 1:length(volume03)) volume03[[i]][is.na(last03[[i]])] <- NA

索引可以很容易地显式操作:

    l=c(NA, 1, 2);k=c(3, 5, 6)
    > i.l=is.na(l)
    > i.l
    [1]  TRUE FALSE FALSE
    > k[i.l]=NA
    > k
    [1] NA  5  6
    > l=c(NA, 1, 2);k=c(3, 5, 6)
    > k[is.na(l)]=NA
    > k
    [1] NA  5  6