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