|
|
A025306
|
|
Numbers that are the sum of 2 distinct nonzero squares in exactly 5 ways.
|
|
3
|
|
|
8125, 10625, 16250, 18125, 21250, 23125, 25625, 32500, 33125, 36250, 38125, 42500, 45625, 46250, 51250, 55625, 60625, 63125, 65000, 66250, 68125, 70625, 72500, 73125, 76250, 85000, 85625, 91250, 92500, 93125, 95625, 98125, 102500, 108125, 111250
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
nn = 111250; 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, 5]] (* T. D. Noe, Apr 07 2011 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|