\begin{Schunk}
\begin{Sinput}
  names(dat)
\end{Sinput}
\begin{Soutput}
[1] "grp" "ed"  "inc" "mar" "sex"
\end{Soutput}
\end{Schunk}
