帮助我找到Haskell中Project Euler#12解决方案的问题

Dev*_*n.W 5 algorithm math haskell

我是Haskell的新手,也是一般的编程,但我正在尝试解决一些Project Euler问题,因为我喜欢解决问题.但是,我遇到问题#12的问题.

我设计了一个我认为可行的解决方案,但唉,事实并非如此.

你可以通过我的代码打开我的眼睛来帮助我,并且可能会把我推向正确的方向来修复它吗?谢谢.

这是代码:

triangleNumber = scanl1 (+) [1..]

factors n = [x | x <- [1..n], n `mod` x == 0]

numFactors = length . factors

eulerTwelve = find ((>500) . numFactors) triangleNumber 
Run Code Online (Sandbox Code Playgroud)

非常感谢你!:)

San*_*dri 2

我复制了它,它给我带来的是找不到 find 的错误。这是因为您需要导入 find 所在的模块 List:

import Data.List
Run Code Online (Sandbox Code Playgroud)

顺便说一下,你应该优化你的因子函数。