Simulations of super bowl pool

Hi Drew,
I was inspired by your blog post about finding the probabilities of the different digit combinations. I wanted to figure out if there was an advantage to selecting a larger number of cells in the grid at random, so created a new script to do that. Also, I found a couple of places in your original code that didn't work with newer versions of ggplot so I modified the parameters to fix those, and added a few more library declarations. Let me know if you see anything wrong with my code or areas to improve, as I'm kind of new to doing simulations.
Thanks,
Will