\begin{Schunk}
\begin{Sinput}
 hist(myx , breaks=30, prob=T, xlab="A Beautiful Variable", ylab="Density", main="")
 text(80, 0.020, label=paste("Mean = ", round(mx,2)), cex=1.5) 
 #text(82, 0.018, label=paste("Std. Dev. = ", round(sdx,2)))
\end{Sinput}
\end{Schunk}
