A127945 Hankel transform of central coefficients of (1+k*x-2x^2)^n, k arbitrary integer.
1, -4, -32, 512, 16384, -1048576, -134217728, 34359738368, 17592186044416, -18014398509481984, -36893488147419103232, 151115727451828646838272, 1237940039285380274899124224, -20282409603651670423947251286016
Offset: 0
Links
- G. C. Greubel, Table of n, a(n) for n = 0..79
Programs
-
Magma
[2^n*(-2)^Binomial(n+1,2): n in [0..25]]; // G. C. Greubel, May 01 2018
-
Mathematica
Table[2^n*(-2)^Binomial[n+1,2], {n, 0, 25}] (* G. C. Greubel, May 01 2018 *)
-
PARI
for(n=0,25, print1(2^n*(-2)^binomial(n+1,2), ", ")) \\ G. C. Greubel, May 01 2018
Formula
a(n) = (cos(Pi*n/2) - sin(Pi*n/2))*4^n*2^C(n,2).
a(n) = 2^n*(-2)^C(n+1,2).
Comments