probabilityMassFunction :: Integral a => a -> a -> Double -> Double
probabilityMassFunction k n p = fromIntegral (n `choose` k) * p^k * (1-p)^(n-k)
probabilityMassFunction :: Integral a => a -> a -> Double -> Double
probabilityMassFunction k n p = fromIntegral (n `choose` k) * p^k * (1-p)^(n-k)
probabilityMassFunction k n p = fromIntegral (n `choose` k) * p^k * (1-p)^(n-k)