A135786 - OEIS

%I #12 Nov 09 2016 02:43:42

%S 16,625,4096,10000,28561,83521,104976,160000,390625,456976,707281,

%T 1048576,1336336,1874161,2560000,2825761,4100625,6250000,7311616,

%U 7890481,11316496,13845841,17850625,21381376,26873856,28398241,29986576

%N a(n) = A000404(n)^4.

%H G. C. Greubel, <a href="/A135786/b135786.txt">Table of n, a(n) for n = 1..1400</a>

%t nMax = 100; p := Floor[Sqrt[nMax - 1]]; Union[Flatten[Table[a^2 + b^2, {a, p}, {b, a, Floor[Sqrt[nMax - a^2]]}]]]^4 (* _G. C. Greubel_, Nov 09 2016 *)

%Y Cf. A000404, A050803, A135784, A060803, A135787, A135788.

%K nonn

%O 1,1

%A _Artur Jasinski_, Nov 29 2007

%E Definition corrected by _Zak Seidov_, Aug 05 2009