R lapply将NA转换为0 [英] R lapply convert NA's to 0

问题描述

我正在尝试使用以下代码将列的子集从NA转换为0.不幸的是，它会将所有单元格都设为0.

I'm trying to convert a subset of columns from NA's to 0's using the following code. Unfortunately it turns all the cells to 0's.

df1 <- data.frame(id = 1:20, col1 = runif(20), col2 = runif(20), col3 = runif(20))

df1[sample(1:20,5),'col1'] <- NA
df1[sample(1:20,5),'col2'] <- NA
df1[sample(1:20,5),'col3'] <- NA

subset1 <- c('col1','col2','col3')

df1[,subset1] <- as.data.frame(lapply(df1[,subset1], function(x) x[is.na(x)] <- 0))

有什么建议吗?

推荐答案

尝试这种简单方法

df1[is.na(df1),] <- 0

这篇关于R lapply将NA转换为0的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！