R version 4.4.0 beta (2024-04-09 r86391 ucrt) -- "Puppy Cup" Copyright (C) 2024 The R Foundation for Statistical Computing Platform: x86_64-w64-mingw32/x64 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. Type 'license()' or 'licence()' for distribution details. R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications. Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for an HTML browser interface to help. Type 'q()' to quit R. > library(Amelia) Loading required package: Rcpp ## ## Amelia II: Multiple Imputation ## (Version 1.8.2, built: 2024-03-04) ## Copyright (C) 2005-2024 James Honaker, Gary King and Matthew Blackwell ## Refer to http://gking.harvard.edu/amelia/ for more information ## > > x <- rnorm(100) > s <- x + rnorm(100, 0, 0.1) > vv <- rep(0.1^2/var(s), 100) > > df <- data.frame(x, s) > mop <- moPrep(df,s ~ s,error.proportion = vv) > a.out <- amelia(mop) -- Imputation 1 -- 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 -- Imputation 2 -- 1 2 3 4 5 6 7 8 9 10 11 12 13 -- Imputation 3 -- 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 -- Imputation 4 -- 1 2 3 4 5 6 7 8 9 10 11 12 13 14 -- Imputation 5 -- 1 2 3 4 5 6 7 8 9 10 11 12 13 14 > > proc.time() user system elapsed 0.21 0.04 0.26