|
Search: id:A137261
|
|
|
| A137261 |
|
G.f.: (5764801*x^8-5764801*x^7+28812*x^4-28812*x^3+840*x-1200)/(x-1). |
|
+0
1
|
|
| 1200, 360, 360, 29172, 360, 360, 360, 5765161, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360, 360
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
The expansion here is simpler than that in the reference on page 192.
|
|
REFERENCES
|
F. R. K. Chung and R. L. Graham, Primitive Juggling Sequences, http://www.maa.org/pubs/monthly_mar08_toc.html.
|
|
FORMULA
|
f(x)=(1 - 7*x + 12*x^4 - 84*x^5 + 120*x^7 - 1200x^8)/(1 - 7*x); a(n) = 7^(n+10*coefficient expansion(x^7*f(1/x))
|
|
MATHEMATICA
|
f[x_] = (1 - 7*x + 12*x^4 - 84*x^5 + 120*x^7 - 1200x^8)/(1 - 7*x); p[x] = ExpandAll[x^7*f[1/x]]; Table[ SeriesCoefficient[Series[p[x]*7^(n + 1), {x, 0, 30}], n], {n, 0, 30}]
|
|
CROSSREFS
|
Adjacent sequences: A137258 A137259 A137260 this_sequence A137262 A137263 A137264
Sequence in context: A113898 A059401 A059402 this_sequence A043408 A022056 A107520
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Mar 11 2008
|
|
EXTENSIONS
|
Edited by njas, Mar 16 2008
|
|
|
Search completed in 0.002 seconds
|
