2<=a<=5, 2<=b<=5のときのa^bの全ての組み合わせは以下のようになる。 2^2=4, 2^3=8, 2^4=16, 2^5=32, 3^2=9, 3^3=27, 3^4=81, 3^5=243, 4^2=16, 4^3=64, 4^4=256, 4^5=1024, 5^2=25, 5^3=125, 5^4=625, 5^5=3125 これらの値を重複を取り除いて小さい順に並べると以下のように15項の数列と なる。4,8,9,16,25,27,32,64,81,125,243,256,625,1024,3125 2<=a<=100, 2<=b<=100のときのa^bは何種類の異なる項からなる数列を生成する か求めよ。
リストの内包表記を利用して全ての場合を求め、リストから重複した要素を取 り除くnub関数を適用して重複を取り除き、lengthで長さを求める。
euler029 = length $ nub [a ^ b | a <- [2..100], b <- [2..100]]