\begin{Schunk}
\begin{Sinput}
 data(swiss)
 ## Assign shorter names to fit on one page
 colnames(swiss) <- c("Agric", "Cath", "Educ", "Exam", "Fert", "Inf.Mort")
 rockchalk::summarize(swiss)
\end{Sinput}
\begin{Soutput}
Numeric variables
           Agric     Cath     Educ     Exam     Fert    Inf.Mort
min         35        1.20     3        1        2.15    10.80  
med         70.40    54.10    16        8       15.14    20     
max         92.50    89.70    37       53      100       26.60  
mean        70.14    50.66    16.49    10.98    41.14    19.94  
sd          12.49    22.71     7.98     9.62    41.70     2.91  
skewness    -0.46    -0.32     0.45     2.27     0.48    -0.33  
kurtosis     0.26    -0.89    -0.14     6.14    -1.67     0.78  
nobs        47       47       47       47       47       47     
nmissing     0        0        0        0        0        0     
\end{Soutput}
\end{Schunk}
