这里首先利用自带数据集airquality 制造假数据。
library(mice)
my_data <- airquality
my_data[sample(153, 10), ]$Wind <- NA
my_data[sample(153, 10), ]$Temp <- NA
> head(my_data
这里首先利用自带数据集airquality 制造假数据。
library(mice)
my_data <- airquality
my_data[sample(153, 10), ]$Wind <- NA
my_data[sample(153, 10), ]$Temp <- NA
> head(my_data