A103485 Expansion of (7 +4*x -5*x^2 -7*x^3) / ((1-x)*(1-x^2-x^3)).

7, 11, 13, 17, 23, 29, 39, 51, 67, 89, 117, 155, 205, 271, 359, 475, 629, 833, 1103, 1461, 1935, 2563, 3395, 4497, 5957, 7891, 10453, 13847, 18343, 24299, 32189, 42641, 56487, 74829, 99127, 131315, 173955, 230441, 305269, 404395, 535709, 709663, 940103

Offset

0,1

Links

Colin Barker, Table of n, a(n) for n = 0..1000

Index entries for linear recurrences with constant coefficients, signature (1,1,0,-1).

Formula

a(n) = a(n-1) + a(n-2) - a(n-4), with a(0)=7, a(1)=11, a(2)=13, a(3)=17.

G.f.: (7 +4*x -5*x^2 -7*x^3) / ((1-x)*(1-x^2-x^3)). - Colin Barker, Mar 20 2016

a(n) = a(n-2) + a(n-3) - 1. - Greg Dresden, May 18 2020

Mathematica

a[0]=7; a[1]=11; a[2]=13; a[3]=17; a[n_]:= a[n]= a[n-1] +a[n-2] -a[n-4]; Table[a[n], {n, 0, 50}]

Prog

(PARI) Vec((7+4*x-5*x^2-7*x^3)/((1-x)*(1-x^2-x^3)) + O(x^50)) \\ Colin Barker, Mar 20 2016

Crossrefs

Sequence in context: A175412 A173700 A067557 * A191079 A279190 A309671

Adjacent sequences: A103482 A103483 A103484 * A103486 A103487 A103488

Keyword

nonn,easy

Author

Roger L. Bagula, Mar 21 2005

Extensions

New name from Colin Barker, Mar 20 2016

Status

approved