|
Search: id:A054206
|
|
|
| A054206 |
|
Consider all integer triples (i,j,k), j >= k>0, with binomial(i+2,3)=j^3+k^3, ordered by increasing i; sequence gives j values. |
|
+0
3
|
|
| 3, 49, 106, 306, 348, 443, 830, 1103, 5169, 6135, 6427, 7512, 10668, 12465, 14061, 18456, 20463, 17943, 21919, 27766, 38509, 41932, 53284, 54040, 67330, 78418, 102298, 135082, 238207
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
COMMENT
|
i values are A054205 and k values are A054207.
|
|
EXAMPLE
|
binomial(5+2,3)=35=2^3+3^3; binomial(95+2,3)=147440=49^3+31^3;
|
|
MATHEMATICA
|
lst = {}; Do[ b = Binomial[i + 2, 3]; j = Floor[b^(1/3)]; lmt = Ceiling[j/2]; While[ k = (b - j^3)^(1/3); j > lmt && !IntegerQ[k], j-- ]; If[j != lmt, Print[{i, j, k}]; AppendTo[lst, {i, j, k}]], {i, 2, 30000}]; (Transpose@lst)[[2]] (* Robert G. Wilson v (rgwv@rgwv.com), Jan 15 2007 *)
|
|
CROSSREFS
|
Cf. A054205, A054207, A000292.
Sequence in context: A033494 A079837 A041523 this_sequence A063777 A067788 A061185
Adjacent sequences: A054203 A054204 A054205 this_sequence A054207 A054208 A054209
|
|
KEYWORD
|
more,nice,nonn
|
|
AUTHOR
|
Klaus Strassburger (strass(AT)ddfi.uni-duesseldorf.de), Jan 28 2000
|
|
EXTENSIONS
|
More terms from Martin Fuller (martin_n_fuller(AT)btinternet.com), Nov 27 2006
|
|
|
Search completed in 0.002 seconds
|
