のてすきあ − 完全独習非プログラマー −

Haskell で Project Euler を解く素人遊び

Re:Problem 34

先日あげたこの問題;

145 は 階乗(!)を用いて 1! + 4! + 5! = 145 となる数である。このような数を全て求めてその和を計算する。

mitstream.hatenablog.jp

その後も効率化できないか気になっていたが、結局はバカの一つ覚えのData.Mapでやれるところまでやってみようということになった(自分の中で)。結果がコチラ↓ 辛うじて実用的な速度に届いた…というところだろうか。

Data.Map は使えるととても便利である。どうにか3倍速くなった☆