如果其中一个变量缺少数据,则用 0 替换一行中的所有值
Replace all values in a row with 0 if one of the variables has missing data
如标题所述,如果任何变量具有 NA,我将尝试用 0 替换给定行中的所有值,并使用 write.table 输出它。例如:
x y z
2 3 5
4 NA 1
3 2 1
到
x y z
2 3 5
0 0 0
3 2 1
目前我的代码如下所示
myvars <- c("x", "y", "z")
newdata <- mydata[myvars]
write.table(newdata, "data.txt", col.names=FALSE, row.names=FALSE)
complete.cases
在这里似乎很合适:
dat[!complete.cases(dat),] <- 0
dat
# x y z
#1 2 3 5
#2 0 0 0
#3 3 2 1
虽然@thelatemail 的回答真的很棒,
多学一招不会有什么坏处。
这是我的解决方案:
dat[rowSums(is.na(dat))>0,]<- 0
dat
# v1 v2 v3
#1 2 3 5
#2 0 0 0
#3 3 2 1
如标题所述,如果任何变量具有 NA,我将尝试用 0 替换给定行中的所有值,并使用 write.table 输出它。例如:
x y z
2 3 5
4 NA 1
3 2 1
到
x y z
2 3 5
0 0 0
3 2 1
目前我的代码如下所示
myvars <- c("x", "y", "z")
newdata <- mydata[myvars]
write.table(newdata, "data.txt", col.names=FALSE, row.names=FALSE)
complete.cases
在这里似乎很合适:
dat[!complete.cases(dat),] <- 0
dat
# x y z
#1 2 3 5
#2 0 0 0
#3 3 2 1
虽然@thelatemail 的回答真的很棒,
多学一招不会有什么坏处。
这是我的解决方案:
dat[rowSums(is.na(dat))>0,]<- 0
dat
# v1 v2 v3
#1 2 3 5
#2 0 0 0
#3 3 2 1