\begin{Schunk}
\begin{Sinput}
 xt.noint <- xtable(hsb.smry.noint, caption="Summary showing all categories",
         label = "tab:sumry.noint", digits=4)
 options(scipen=20) ## I don't want scientific notation
 print(xt.noint, table.placement="H", caption.placement="top")
\end{Sinput}
% latex table generated in R 3.5.1 by xtable 1.8-2 package
% Tue Sep 11 14:12:40 2018
\begin{table}[H]
\centering
\caption{Summary showing all categories} 
\label{tab:sumry.noint}
\begin{tabular}{rrr}
  \hline
 & mean & sd \\ 
  \hline
ses & 0.0001 & 0.7794 \\ 
  size & 1056.8618 & 604.1725 \\ 
  sectorPublic & 0.5069 & 0.5000 \\ 
  sectorCatholic & 0.4931 & 0.5000 \\ 
  genderFemale & 0.5282 & 0.4992 \\ 
  ethnicityNon-white & 0.2747 & 0.4464 \\ 
   \hline
\end{tabular}
\end{table}\end{Schunk}
