\begin{Schunk}
\begin{Soutput}
fmi <- fit.mult.impute(bmi ~ hyp + chl, lm, f, data= nhanesf)
\end{Soutput}
\begin{Soutput}
sqrt(diag(vcov(fmi)))
\end{Soutput}
\end{Schunk}
