[go: up one dir, main page]

login
A019512
Expansion of 1/((1-4x)(1-7x)(1-8x)).
1
1, 19, 245, 2675, 26661, 251139, 2278165, 20125075, 174364421, 1488724259, 12567504885, 105148209075, 873459639781, 7213661997379, 59291458568405, 485407880414675, 3960800821356741, 32229188196998499
OFFSET
0,2
FORMULA
a(n) = (3*8^(n+2)-4*7^(n+2)+4^(n+2))/12. [Yahia Kahloune, May 06 2013]
a(0)=1, a(1)=19, a(2)=245; for n>2, a(n) = 19*a(n-1) -116*a(n-2) +224*a(n-3). - Vincenzo Librandi, Jul 03 2013
a(n) = 15*a(n-1) -56*a(n-2) +4^n. - Vincenzo Librandi, Jul 03 2013
MATHEMATICA
CoefficientList[Series[1 / ((1 - 4 x) (1 - 7 x) (1 - 8 x)), {x, 0, 20}], x] (* Vincenzo Librandi, Jul 03 2013 *)
LinearRecurrence[{19, -116, 224}, {1, 19, 245}, 20] (* Harvey P. Dale, Sep 26 2019 *)
PROG
(Magma) m:=20; R<x>:=PowerSeriesRing(Integers(), m); Coefficients(R!(1/((1-4*x)*(1-7*x)*(1-8*x)))); /* or */ I:=[1, 19, 245]; [n le 3 select I[n] else 19*Self(n-1)-116*Self(n-2)+224*Self(n-3): n in [1..20]]; // Vincenzo Librandi, Jl 03 2013
CROSSREFS
Sequence in context: A021772 A019783 A021504 * A025927 A224180 A318194
KEYWORD
nonn,easy
AUTHOR
STATUS
approved