\begin{Schunk}
\begin{Sinput}
 set.seed(66565) #put in any integer you like
 x <- rnorm(n = 40, mean = 7, sd = 2)
 y <- rnorm(n = 40, mean = 35, sd = 10)
\end{Sinput}
\end{Schunk}
