login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A071100 Expansion of (5 + 3*x + x^2 - x^3) / (1 - 2*x - 2*x^2 - 2*x^3 + x^4) in powers of x. 4

%I #35 Sep 03 2021 14:30:18

%S 5,13,37,109,313,905,2617,7561,21853,63157,182525,527509,1524529,

%T 4405969,12733489,36800465,106355317,307372573,888323221,2567301757,

%U 7419639785,21443156953,61971873769,179102039257,517614500173,1495933669445,4323328543981

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

%C Number of tilings of the 0-mod-4 pillow of order n is a perfect square times a(n). [Propp, 1999, p. 271]

%D J. Propp, Enumeration of matchings: problems and progress, pp. 255-291 in L. J. Billera et al., eds, New Perspectives in Algebraic Combinatorics, Cambridge, 1999 (see Problem 12).

%H A.H.M. Smeets, <a href="/A071100/b071100.txt">Table of n, a(n) for n = 0..2169</a>

%H J. Propp, <a href="http://faculty.uml.edu/jpropp/update.pdf">Updated article</a>

%H J. Propp, Enumeration of matchings: problems and progress, in L. J. Billera et al. (eds.), <a href="http://www.msri.org/publications/books/Book38/contents.html">New Perspectives in Algebraic Combinatorics</a>

%H <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (2,2,2,-1).

%F G.f.: (5 + 3*x + x^2 -x^3) / (1 - 2*x - 2*x^2 - 2*x^3 + x^4).

%F a(-n) = a(-5 + n). a(-1) = a(-2) = 1. a(n) = 2*a(n-1) + 2*a(n-2) + 2*a(n-3) - a(n-4). - _Michael Somos_, Dec 15 2011

%F A112835(2*n + 2) = a(n).

%F Lim_{n -> inf} a(n)/a(n-1) = A318605. - _A.H.M. Smeets_, Sep 12 2018

%e G.f. = 5 + 13*x + 37*x^2 + 109*x^3 + 313*x^4 + 905*x^5 + 2617*x^6 + 7561*x^7 + ...

%p seq(coeff(series((5+3*x+x^2-x^3)/(1-2*x-2*x^2-2*x^3+x^4),x,n+1), x, n), n = 0 .. 30); # _Muniru A Asiru_, Sep 12 2018

%t CoefficientList[Series[(5 + 3*x + x^2 -x^3)/(1 - 2*x - 2*x^2 - 2*x^3 + x^4), {x, 0, 50}], x] (* _Stefano Spezia_, Sep 12 2018 *)

%t LinearRecurrence[{2,2,2,-1},{5,13,37,109},30] (* _Harvey P. Dale_, Sep 03 2021 *)

%o (PARI) {a(n) = my(m = n+2); if( m < 0, m = -1 - m); polcoeff( (1 - x + x^2 - x^3) / (1 - 2*x - 2*x^2 - 2*x^3 + x^4) + x * O(x^m), m)}; /* _Michael Somos_, Dec 15 2011 */

%o (PARI) x='x+O('x^33); Vec((5+3*x+x^2-x^3)/(1-2*x-2*x^2-2*x^3+x^4)) \\ _Altug Alkan_, Sep 12 2018

%o (GAP) a:=[5,13,37,109];; for n in [5..30] do a[n]:=2*a[n-1]+2*a[n-2]+2*a[n-3]-a[n-4]; od; a; # _Muniru A Asiru_, Sep 12 2018

%Y Cf. A112835.

%K nonn,easy

%O 0,1

%A _N. J. A. Sloane_, May 28 2002

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 13:42 EDT 2024. Contains 371254 sequences. (Running on oeis4.)