1、
dat <- read.table("test.txt", header = F) dat dat$V2[dat$V2 == "<NA>"] = 100 dat dat$V2[dat$V2 == NA] = 100 dat dat$V2[is.na(dat$V2)] = 100 dat
> dat <- read.table("test.txt", header = F) ## 读取测试数据 > dat V1 V2 V3 1 7 ab 8 2 d <NA> k 3 a 34 <NA> 4 3 <NA> 44 > dat$V2[dat$V2 == "<NA>"] = 100 ## 将第二列中是NA的数据变为100, 直接判断不能实现 > dat V1 V2 V3 1 7 ab 8 2 d <NA> k 3 a 34 <NA> 4 3 <NA> 44 > dat$V2[dat$V2 == NA] = 100 ## 仍然不能实现 > dat V1 V2 V3 1 7 ab 8 2 d <NA> k 3 a 34 <NA> 4 3 <NA> 44 > dat$V2[is.na(dat$V2)] = 100 ## 对于NA的判断,需要用is.na > dat V1 V2 V3 1 7 ab 8 2 d 100 k 3 a 34 <NA> 4 3 100 44