|
Search: id:A025320
|
|
|
| A025320 |
|
Numbers that are the sum of 2 distinct nonzero squares in 10 or more ways. |
|
+0
8
|
|
| 138125, 160225, 204425, 226525, 235625, 276250, 292825, 300625, 308125, 320450, 333125, 337025, 348725, 359125, 386425, 393125, 403325, 408850, 416585, 430625, 435625, 453050, 456025, 469625, 471250, 491725, 493025, 495625, 499525, 505325
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
Index entries for sequences related to sums of squares
|
|
MATHEMATICA
|
lst={}; q=-1; k=1; Do[Do[x=a^2; Do[y=b^2; If[x+y==n, If[n==q&&k==9, Print[n, ", ", Date[]]; AppendTo[lst, n]]; If[n!=q, q=n; k=1, k++ ]], {b, Floor[(n-x)^(1/2)], a+1, -1}], {a, Floor[n^(1/2)], 1, -1}], {n, 7!, 2*9!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Jan 22 2009]
|
|
CROSSREFS
|
Cf. A025301. [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Oct 23 2008]
Sequence in context: A110598 A069336 A025301 this_sequence A025293 A025311 A081429
Adjacent sequences: A025317 A025318 A025319 this_sequence A025321 A025322 A025323
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
David W. Wilson (davidwwilson(AT)comcast.net)
|
|
|
Search completed in 0.002 seconds
|
