Run fewer iterations in run_simulations example

Closes #143

R/run_simulations.R

@@ -22,7 +22,7 @@
 #'   sample_prob = c(0.5, 0.5),
 #'   prob0 = c(0.1, 0.2, 0.3, 0.4),
 #'   prob1 = c(0.6, 0.2, 0.1, 0.1),
-#'   niter = 100
+#'   niter = 50
 #' )
 #'
 run_simulations <- function(sample_size, sample_prob, prob0, prob1, niter, included = "all",