11 ms·haskell list comprehension entropy x = - sum [p i * (log . p) i | i <- [1..x]]by gregwebs 17y agohaskell list comprehension entropy x = - sum [p i * (log . p) i | i <- [1..x]]