A085353 Expansion of (1-5x)/((1-6x)(1-7x)).

1, 8, 62, 470, 3506, 25838, 188642, 1367150, 9849986, 70629518, 504484322, 3591856430, 25505792066, 180717326798, 1278081981602, 9024938035310, 63644751231746, 448334368529678, 3155267239152482, 22188430630735790

Offset: 0

Author

Paul Barry, Jun 24 2003

Keywords

• easy
• nonn

Comments

Binomial transform of A085352.

Links

• Index entries for linear recurrences with constant coefficients, signature (13,-42).

Crossrefs

Cf. A085352.

Programs

Maple

A085353:=n->2*7^n - 6^n; seq(A085353(n), n=0..20); # Wesley Ivan Hurt, Dec 02 2013

Mathematica

Table[2*7^n - 6^n, {n, 0, 20}] (* Wesley Ivan Hurt, Dec 02 2013 *)
CoefficientList[Series[(1-5x)/((1-6x)(1-7x)),{x,0,30}],x] (* Harvey P. Dale, Apr 22 2019 *)

Formula

a(n) = 2*7^n-6^n.

a(n) = 2*A000420(n) - A000400(n). - Michel Marcus, Dec 03 2013