login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A115219 Expansion of 2*x^2*(1-x)/(1-3*x+2*x^2-2*x^3). 1

%I

%S 0,0,2,4,8,20,52,132,332,836,2108,5316,13404,33796,85212,214852,

%T 541724,1365892,3443932,8683460,21894300,55203844,139189852,350950468,

%U 884879388,2231116932,5625492956,14184003780,35763259292,90172756228,227359757660

%N Expansion of 2*x^2*(1-x)/(1-3*x+2*x^2-2*x^3).

%H G. C. Greubel, <a href="/A115219/b115219.txt">Table of n, a(n) for n = 0..1000</a>

%H 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 <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (3,-2,2)

%F a(n+3) = 3*a(n+2) - 2*a(n+1) + 2*a(n). - _G. C. Greubel_, Feb 05 2016

%t CoefficientList[Series[2x^2(1-x)/(1-3x+2x^2-2x^3),{x,0,30}],x] (* or *)

%t Join[{0},LinearRecurrence[{3,-2,2},{0,2,4},30]] (* _Harvey P. Dale_, Apr 25 2011 *)

%o (MAGMA) I:=[0,0,2,4,8]; [n le 5 select I[n] else 3*Self(n-1) - 2*Self(n-2) + 2*Self(n-3): n in [1..40]]; // _Vincenzo Librandi_, Jan 06 2016

%K nonn

%O 0,3

%A _N. J. A. Sloane_, Mar 05 2006

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 15 04:03 EDT 2021. Contains 343909 sequences. (Running on oeis4.)