OFFSET
0,2
COMMENTS
The second left hand column of triangle A175136.
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (6,-12,8).
FORMULA
MAPLE
MATHEMATICA
Join[{1}, LinearRecurrence[{6, -12, 8}, {2, 6, 17}, 30]] (* or *) CoefficientList[Series[((1-x)*(3*x^2-3*x+1))/(1-2*x)^3, {x, 0, 50}], x] (* G. C. Greubel, Jan 10 2018 *)
PROG
(PARI) x='x+O('x^30); Vec(((1-x)*(3*x^2-3*x+1))/(1-2*x)^3) \\ G. C. Greubel, Jan 10 2018
(PARI) for(n=0, 30, print1(if(n==0, 1, (n^2 + 5*n + 10)*2^(n-4)), ", ")) \\ G. C. Greubel, Jan 10 2018
(Magma) [1] cat [(n^2 + 5*n + 10)*2^(n-4): n in [1..30]]; // G. C. Greubel, Jan 10 2018
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Johannes W. Meijer, May 06 2011
STATUS
approved