A095653 Fifth column of Salié-triangle A065547.

1, -10, 135, -2492, 60605, -1879038, 72346915, -3386587600, 189409454649, -12474273613490, 955514574905471, -84228064915705380, 8465814535319723125, -962413843819623611302, 122866266360070054689435, -17503231485467828809214648, 2766579085410558809483880305

Offset

0,2

Links

Table of n, a(n) for n=0..16.

Formula

a(n)= A065547(n+4, 4), n>=0.

Mathematica

col = 5; nmax = 16; h[n_, x_] := Sum[c[k]*x^k, {k, 0, n}]; eq[n_] := SolveAlways[h[n, x*(x - 1)] == EulerE[2*n, x], x]; row[n_] := Table[c[k], {k, 0, n}] /. eq[n] // First; A065547 = Table[row[n], {n, 0, nmax + col}]; a[n_] := A065547[[n + col, col]]; Table[a[n], {n, 0, nmax}] (* Jean-François Alcover, Oct 02 2013 *)

Crossrefs

Sequence in context: A114936 A341968 A232265 * A024135 A050408 A133197

Adjacent sequences: A095650 A095651 A095652 * A095654 A095655 A095656

Keyword

sign,easy

Author

Wolfdieter Lang, Jun 11 2004

Status

approved