added explicit calculation of P[k|n]

Added as a check the explicit calculation of P[length of longest run ==
k | n bernoulli trials]