\begin{Schunk}
\begin{Sinput}
> myPuzzle <- generateSudoku(Nblank = 20, print.it = FALSE)
> printSudoku(myPuzzle)
\end{Sinput}
\begin{Soutput}
  +-------+-------+-------+
  | 2   5 | 7   4 | 8 1   |
  | 4 7   | 1 9 8 | 5 2   |
  | 9 8 1 |   2 3 | 7 6 4 |
  +-------+-------+-------+
  | 5 2 3 | 4 7 6 | 9 8 1 |
  |     8 |     2 | 4 7   |
  | 6   7 | 8 1 9 | 3 5   |
  +-------+-------+-------+
  | 7 6 4 | 9 8 1 |   3 5 |
  |     9 |     5 | 6 4 7 |
  |   5 2 | 6 4 7 |   9 8 |
  +-------+-------+-------+
\end{Soutput}
\end{Schunk}
