\begin{Schunk}
\begin{Sinput}
 set.seed(234234)
 N <- 1000
 mu <- 44
 sigma <- 10
 x <- rnorm(N, m = mu, s = sigma)
 hist(x, breaks = 30)
\end{Sinput}
\end{Schunk}
