\begin{Schunk}
\begin{Sinput}
 N <- 1
 size <- 1000
 y2 <- rbinom(N, size, prob)
 y2
\end{Sinput}
\begin{Soutput}
[1] 404
\end{Soutput}
\end{Schunk}
