小编swc*_*cai的帖子

Euler项目中的问题10.我在那里看到了一些讨论但只针对C.

我使用以下代码来计算:

print . sum . sieve $ [2..2000000] where
    sieve [] = []
    sieve (x:xs) = x : sieve (filter ((/= 0) . (`mod` x)) xs)

计算需要很长时间.我想知道是否有更有效的方法来计算它？