login
A025309
Numbers that are the sum of 2 distinct nonzero squares in exactly 8 ways.
2
27625, 32045, 40885, 45305, 47125, 55250, 58565, 60125, 61625, 64090, 66625, 67405, 69745, 77285, 78625, 80665, 81770, 86125, 87125, 90610, 91205, 94250, 98345, 98605, 99125, 99905, 101065, 107185, 110500, 111605, 112625, 114985, 117130, 118625
OFFSET
1,1
MATHEMATICA
nn = 118625; t = Table[0, {nn}]; lim = Floor[Sqrt[nn - 1]]; Do[num = i^2 + j^2; If[num <= nn, t[[num]]++], {i, lim}, {j, i - 1}]; Flatten[Position[t, 8]] (* T. D. Noe, Apr 07 2011 *)
CROSSREFS
Sequence in context: A025299 A025318 A025291 * A097244 A375014 A350185
KEYWORD
nonn
STATUS
approved