|
|
A025308
|
|
Numbers that are the sum of 2 distinct nonzero squares in exactly 7 ways.
|
|
2
|
|
|
105625, 180625, 203125, 211250, 265625, 361250, 406250, 422500, 453125, 525625, 531250, 578125, 640625, 714025, 722500, 812500, 828125, 845000, 855625, 906250, 950625, 953125, 1050625, 1051250, 1062500, 1140625, 1156250, 1281250, 1390625
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
nn = 1390625; 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, 7]] (* T. D. Noe, Apr 07 2011 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|