# NOT RUN {
set.seed(123)
ds_mis <- data.frame(X = rnorm(10), Y = rnorm(10))
ds_mis[2:4, 1] <- NA
ds_mis[4:6, 2] <- NA
# default returns only complete rows
model_donor(ds_mis)
# with partly_complete and knn returned objects depends on i
model_donor(ds_mis,
i = 2,
model_arg = list(selection = "partly_complete_rows")
)
model_donor(ds_mis,
i = 4,
model_arg = list(selection = "partly_complete_rows")
)
model_donor(ds_mis,
i = 5,
model_arg = list(selection = "partly_complete_rows")
)
model_donor(ds_mis,
i = 5,
model_arg = list(selection = "knn_partly_complete_rows", k = 2)
)
# }
Run the code above in your browser using DataLab