A074085 -id:A074085 - cp's OEIS frontend

A074084 Coefficient of q^1 in nu(n), where nu(0)=1, nu(1)=b and, for n>=2, nu(n)=bnu(n-1)+lambda(1+q+q^2+...+q^(n-2))*nu(n-2) with (b,lambda)=(2,1).

0, 0, 0, 2, 9, 32, 102, 306, 883, 2480, 6828, 18514, 49597, 131568, 346194, 904738, 2350695, 6076960, 15641304, 40103778, 102473969, 261046144, 663180222, 1680628946, 4249496795, 10722962256, 27007159428, 67904097074

Offset: 0

Y. Kelly Itakura (yitkr(AT)mta.ca), Aug 19 2002

nonn

The coefficient of q^0 is the Pell number A000129(n+1).

			The first 6 nu polynomials are nu(0)=1, nu(1)=2, nu(2)=5, nu(3)=12+2q, nu(4)=29+9q+5q^2, nu(5)=70+32q+24q^2+14q^3+2q^4, so the coefficients of q^1 are 0,0,0,2,9,32.

M. Beattie, S. Dăscălescu and S. Raianu, Lifting of Nichols Algebras of Type B_2, arXiv:math/0204075 [math.QA], 2002.
Index entries for linear recurrences with constant coefficients, signature (4, -2, -4, -1).

Coefficients of q^0, q^2 and q^3 are in A000129, A074085 and A074086. Related sequences with other values of b and lambda are in A074082-A074083 and A074087-A074089.

b=2; lambda=1; expon=1; nu[0]=1; nu[1]=b; nu[n_] := nu[n]=Together[b*nu[n-1]+lambda(1-q^(n-1))/(1-q)nu[n-2]]; a[n_] := Coefficient[nu[n], q, expon]
(* Second program: *)
Join[{0},LinearRecurrence[{4,-2,-4,-1},{0,0,2,9},30]] (* Harvey P. Dale, Apr 18 2012 *)

G.f.: (2x^3+x^4)/(1-2x-x^2)^2.

a(n) = 4a(n-1)-2a(n-2)-4a(n-3)-a(n-4) for n>=5.

Edited by Dean Hickerson, Aug 21 2002

A074086 Coefficient of q^3 in nu(n), where nu(0)=1, nu(1)=b and, for n>=2, nu(n)=bnu(n-1)+lambda(1+q+q^2+...+q^(n-2))*nu(n-2) with (b,lambda)=(2,1).

Original entry on oeis.org

0, 0, 0, 0, 0, 14, 71, 282, 997, 3298, 10439, 32012, 95834, 281494, 814131, 2324422, 6564135, 18362810, 50947395, 140329400, 384031508, 1044880222, 2828084399, 7618214354, 20432838121, 54585196818, 145287466799, 385397215108

Offset: 0

Y. Kelly Itakura (yitkr(AT)mta.ca), Aug 19 2002

nonn

The coefficient of q^0 is the Pell number A000129(n+1).

			The first 6 nu polynomials are nu(0)=1, nu(1)=2, nu(2)=5, nu(3)=12+2q, nu(4)=29+9q+5q^2, nu(5)=70+32q+24q^2+14q^3+2q^4, so the coefficients of q^3 are 0,0,0,0,0,14.

M. Beattie, S. Dăscălescu and S. Raianu, Lifting of Nichols Algebras of Type B_2, arXiv:math/0204075 [math.QA], 2002.
Index entries for linear recurrences with constant coefficients, signature (8, -20, 8, 26, -8, -20, -8, -1).

Coefficients of q^0, q^1 and q^2 are in A000129, A074084 and A074085. Related sequences with other values of b and lambda are in A074082-A074083 and A074087-A074089.

b=2; lambda=1; expon=3; nu[0]=1; nu[1]=b; nu[n_] := nu[n]=Together[b*nu[n-1]+lambda(1-q^(n-1))/(1-q)nu[n-2]]; a[n_] := Coefficient[nu[n], q, expon]
(* Second program: *)
Join[{0, 0, 0}, LinearRecurrence[{8, -20, 8, 26, -8, -20, -8, -1}, {0, 0, 14, 71, 282, 997, 3298, 10439}, 25]] (* Jean-François Alcover, Jan 27 2019 *)

G.f.: (14x^5-41x^6-6x^7+49x^8+30x^9+5x^10)/(1-2x-x^2)^4.

a(n) = 8a(n-1)-20a(n-2)+8a(n-3)+26a(n-4)-8a(n-5)-20a(n-6)-8a(n-7)-a(n-8) for n>=11.

Edited by Dean Hickerson, Aug 21 2002

cp's OEIS Frontend

A074084 Coefficient of q^1 in nu(n), where nu(0)=1, nu(1)=b and, for n>=2, nu(n)=bnu(n-1)+lambda(1+q+q^2+...+q^(n-2))*nu(n-2) with (b,lambda)=(2,1).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

Extensions

A074086 Coefficient of q^3 in nu(n), where nu(0)=1, nu(1)=b and, for n>=2, nu(n)=bnu(n-1)+lambda(1+q+q^2+...+q^(n-2))*nu(n-2) with (b,lambda)=(2,1).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

Extensions

cp's OEIS Frontend

A074084 Coefficient of q^1 in nu(n), where nu(0)=1, nu(1)=b and, for n>=2, nu(n)=b*nu(n-1)+lambda*(1+q+q^2+...+q^(n-2))*nu(n-2) with (b,lambda)=(2,1).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

Extensions

A074086 Coefficient of q^3 in nu(n), where nu(0)=1, nu(1)=b and, for n>=2, nu(n)=b*nu(n-1)+lambda*(1+q+q^2+...+q^(n-2))*nu(n-2) with (b,lambda)=(2,1).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

Extensions

A074084 Coefficient of q^1 in nu(n), where nu(0)=1, nu(1)=b and, for n>=2, nu(n)=bnu(n-1)+lambda(1+q+q^2+...+q^(n-2))*nu(n-2) with (b,lambda)=(2,1).

A074086 Coefficient of q^3 in nu(n), where nu(0)=1, nu(1)=b and, for n>=2, nu(n)=bnu(n-1)+lambda(1+q+q^2+...+q^(n-2))*nu(n-2) with (b,lambda)=(2,1).