将na替换为“x”[is.na(x)]=0'将替换整个数据帧,而不仅仅是nas?[副本]

我有点困惑。我的 列表中的数据帧 包含 NA值 ,我想 替换为0 . 在一个数据帧上,我可以通过 df[is.na(df)]=0 ,并且当应用于单个data.frame时,这很好地工作。 但是,当应用于列表时( lapply(l, function(x) x[is.na(x)]=0) ), 这将生成仅包含0的数据帧 。

虚拟数据:

df1<-data.frame(class = rep("BO", 3),
                a = c(NA,2,3))
df2<-data.frame(class = rep("BS", 3),
                a = c(5,NA,7))

l<-list(df1, df2)

# Convert NA to 0
l2<-lapply(l, function(x) x[is.na(x)]=0)

结果:

[[1]]
[1] 0

[[2]]
[1] 0

但我怎么能得到这个呢?

[[1]]
  class  a
1    BO  0
2    BO  2
3    BO  3

[[2]]
  class  a
1    BS  5
2    BS  0
3    BS  7