Martingale betting simulator in R