login
A135784
a(n) = A000404(n)^2.
12
4, 25, 64, 100, 169, 289, 324, 400, 625, 676, 841, 1024, 1156, 1369, 1600, 1681, 2025, 2500, 2704, 2809, 3364, 3721, 4225, 4624, 5184, 5329, 5476, 6400, 6724, 7225, 7921, 8100, 9409, 9604, 10000, 10201, 10816, 11236, 11881, 12769, 13456, 13689, 14884
OFFSET
1,1
LINKS
MATHEMATICA
nMax = 100; p := Floor[Sqrt[nMax - 1]]; Union[Flatten[Table[a^2 + b^2, {a, p}, {b, a, Floor[Sqrt[nMax - a^2]]}]]]^2 (* G. C. Greubel, Nov 09 2016 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Artur Jasinski, Nov 29 2007
STATUS
approved