A025289 Numbers that are the sum of 2 nonzero squares in exactly 6 ways.

5525, 9425, 11050, 12025, 12325, 13325, 14365, 15725, 17225, 17425, 18785, 18850, 19825, 21125, 22100, 22525, 23725, 24050, 24505, 24650, 25925, 26650, 26825, 28730, 28925, 29725, 31025, 31265, 31450, 31525, 32825, 34450, 34645, 34850, 35425, 36125

Offset

1,1

Links

Donovan Johnson, Table of n, a(n) for n = 1..1000

Index entries for sequences related to sums of squares

Mathematica

nn = 36125; t = Table[0, {nn}]; lim = Floor[Sqrt[nn - 1]]; Do[num = i^2 + j^2; If[num <= nn, t[[num]]++], {i, lim}, {j, i}]; Flatten[Position[t, 6]] (* T. D. Noe, Apr 07 2011 *)

Crossrefs

Sequence in context: A097103 A025297 A025316 * A025307 A068269 A164079

Adjacent sequences: A025286 A025287 A025288 * A025290 A025291 A025292

Keyword

nonn

Author

David W. Wilson

Status

approved