Update Birthday Problem simulation in R.Rmd