|
| |
|
|
A025317
|
|
Numbers that are the sum of 2 distinct nonzero squares in 7 or more ways.
|
|
5
|
|
|
|
27625, 32045, 40885, 45305, 47125, 55250, 58565, 60125, 61625, 64090, 66625, 67405, 69745, 71825, 77285, 78625, 80665, 81770, 86125, 87125, 90610, 91205, 93925, 94250, 98345, 98605, 99125, 99905, 101065, 105625, 107185, 110500, 111605, 112625
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
Table of n, a(n) for n=1..34.
Index entries for sequences related to sums of squares
|
|
|
MATHEMATICA
|
nn = 112625; 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
|
Sequence in context: A206364 A224110 A025298 * A025299 A025318 A025291
Adjacent sequences: A025314 A025315 A025316 * A025318 A025319 A025320
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
David W. Wilson
|
|
|
STATUS
|
approved
|
| |
|
|
