R/mice_multilevel_imputation_draw_residuals.R

In alexanderrobitzsch/miceadds: Some Additional Multiple Imputation Functions, Especially for 'mice'

## File Name: mice_multilevel_imputation_draw_residuals.R
## File Version: 0.08


#*** draw residuals
mice_multilevel_imputation_draw_residuals <- function(predicted, sigma )
{
    N0 <- length(predicted)
    imp <- predicted + stats::rnorm(N0, mean=0, sd=sigma)
    return(imp)
}