\begin{Schunk}
\begin{Sinput}
 imps <- list()
 for(i in 1:5){
      imps[[i]] <- complete(miceimputed, action = i)
  }
\end{Sinput}
\end{Schunk}
