|
|
A025311
|
|
Numbers that are the sum of 2 distinct nonzero squares in exactly 10 ways.
|
|
4
|
|
|
138125, 235625, 276250, 300625, 308125, 333125, 393125, 430625, 435625, 471250, 495625, 552500, 563125, 593125, 601250, 616250, 648125, 666250, 670625, 723125, 743125, 775625, 786250, 788125, 820625, 861250, 871250, 885625, 918125, 942500
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
nn = 942500; 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, 10]] (* T. D. Noe, Apr 07 2011 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|