|
Search: id:A054402
|
|
|
| A054402 |
|
Sum of a positive square and a positive cube in more than one way. |
|
+0
4
|
|
| 17, 65, 89, 108, 129, 145, 225, 233, 252, 297, 316, 388, 449, 464, 505, 537, 548, 577, 593, 633, 730, 737, 745, 792, 793, 801, 873, 1025, 1088, 1090, 1116, 1289, 1304, 1305, 1367, 1412, 1441, 1452, 1529, 1585, 1601
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
EXAMPLE
|
a(0)=17 since 17=3^2+2^3=4^2+1^3
|
|
MATHEMATICA
|
lst={}; Do[Do[AppendTo[lst, n^2+m^3], {n, 5!}], {m, 5!}]; lst=Sort[lst]; lst2={}; Do[If[lst[[n]]==lst[[n+1]], AppendTo[lst2, lst[[n]]]], {n, Length[lst]-1}]; lst2; Take[Union[lst2], 123] [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Jul 17 2009]
|
|
CROSSREFS
|
Cf. A055393, A055394.
Sequence in context: A063522 A145850 A125992 this_sequence A086533 A108211 A130885
Adjacent sequences: A054399 A054400 A054401 this_sequence A054403 A054404 A054405
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
Henry Bottomley (se16(AT)btinternet.com), May 12 2000
|
|
|
Search completed in 0.002 seconds
|
