18 ms·
For kicks, here it is in R: PlusRandom <- function(initial, steps) { if (initial > 1) steps else PlusRandom(initial + urand(1), steps + 1) } mea
by etal 16y ago
For kicks, here it is in R:
PlusRandom <- function(initial, steps) {
if (initial > 1) steps
else PlusRandom(initial + urand(1), steps + 1)
}
mean(replicate(100000, PlusRandom(0,0))
[1] 2.71872