r语言插补法_r语言如何自动填补缺失值？

缺失值插补

data

newdata

sum(!complete.cases(newdata))

#统计变量中？个数

mydata

col_names

length(which(mydata=="?"))

length(which(mydata=="N"))

table(subject)

mydata[mydata=="?"]

library(misc)

describe()

library(psych)

describe()

library(mice)

#data(newdata)

mydata

imp

imp$imp$age

complete(imp,action=2)

library(xlsx)

library(rJava)

write.xlsx(mydata,"mydata.xlsx")

library(rJava)

dd

sum(is.na(dd[,2]))

ncol(dd)

attach(dd)

select_colname

select_colname[is.na(select_colname)]

### dplyr hmisc

library(dplyr)

library(hmisc)

df %>% mutate_all(impute,mean)

data(sleep,package="VIM")