\begin{Schunk}
\begin{Sinput}
 save(mod1, mod2, mod3, file = file.path(wdir, paste0("nes2004-objects-", today,  ".RData")))
\end{Sinput}
\end{Schunk}
