impute_rhd: pool = "complete": If a record has multiple missings, imputations are taken from a different donors

[tatsianapek]

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)

[markvanderloo]

Thank you Tatsiana, for taking the trouble of creating a simple example.

by coincidence I received a similar issue with impute_rhd this week. Will fix.

[MichaelLeviValensin]

I had the same problem