In package specification there is defined that for impute_rhd when pool value is "complete" and "a record has multiple missings, all imputations are taken from a single donor", while it does not apply.
Example:
test <- data.frame(seq(1,15), seq(1,15))
colnames(test) <- c("num1", "num2")
test$num1[2:6] <- NA
test$num2[4:8] <- NA
set.seed(1000)
head(test %>% impute_rhd(num1 + num2 ~ 1, pool = "complete"), 10)
In package specification there is defined that for impute_rhd when pool value is "complete" and "a record has multiple missings, all imputations are taken from a single donor", while it does not apply.
Example:
test <- data.frame(seq(1,15), seq(1,15))
colnames(test) <- c("num1", "num2")
test$num1[2:6] <- NA
test$num2[4:8] <- NA
set.seed(1000)
head(test %>% impute_rhd(num1 + num2 ~ 1, pool = "complete"), 10)