powered by
maxCMS(match)
x <- rbinom(100, size = 1, prob = 1/3) CMS(x == 1) # expected value for longest match is 3 maxCMS(x==1)
Run the code above in your browser using DataLab