# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a137261
Showing 1-1 of 1

%I A137261 #13 May 02 2017 22:17:17
%S A137261 1200,360,360,29172,360,360,360,5765161,360,360,360,360,360,360,360,
%T A137261 360,360,360,360,360,360,360,360,360,360,360,360,360,360,360,360,360,
%U A137261 360,360,360,360,360,360,360,360,360,360,360,360,360,360,360,360,360,360,360,360
%N A137261 G.f.: (5764801*x^8-5764801*x^7+28812*x^4-28812*x^3+840*x-1200)/(x-1).
%C A137261 The expansion here is simpler than that in the reference on page 192.
%H A137261 Fan Chung, R. L. Graham, <a href="http://www.jstor.org/stable/27642443">Primitive juggling sequences</a>, Am. Math. Monthly 115 (3) (2008) 185-194
%H A137261 <a href="/index/Rec#order_01">Index entries for linear recurrences with constant coefficients</a>, signature (1).
%F A137261 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))
%t A137261 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}]
%K A137261 nonn
%O A137261 1,1
%A A137261 _Roger L. Bagula_, Mar 11 2008
%E A137261 Edited by _N. J. A. Sloane_, Mar 16 2008

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE