set seed for random draws

I'd suggest two rules of thumb when coming
up against something in R that you aren't
sure about:

1. If it is a mundane task, R probably
takes care of it.

2. Experiment to see what happens.


Of course you could read documentation, but
no one does that.