diff --git a/4/script.R b/4/script.R index 2efc6ac..7a886ea 100755 --- a/4/script.R +++ b/4/script.R @@ -9,7 +9,6 @@ expected_mean <- 1.0 / 21.0 nums <- rexp(nums_len, rate = expected_mean) # Then generate the cumulative sum of them -# TODO: Is `max_time` even required? nums_cumsum <- cumsum(nums) max_time <- ceiling(nums_cumsum[nums_len])