\begin{Schunk}
\begin{Sinput}
 par(mar=c(7.1, 4.1, 2, 2.1))
 barplot(t1,beside=T, las=2, ylim=c(0,1))
\end{Sinput}
\end{Schunk}
