login
Fifth column of Salié-triangle A065547.
0

%I #10 Oct 02 2013 09:58:06

%S 1,-10,135,-2492,60605,-1879038,72346915,-3386587600,189409454649,

%T -12474273613490,955514574905471,-84228064915705380,

%U 8465814535319723125,-962413843819623611302,122866266360070054689435,-17503231485467828809214648,2766579085410558809483880305

%N Fifth column of Salié-triangle A065547.

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

%t 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 *)

%K sign,easy

%O 0,2

%A _Wolfdieter Lang_, Jun 11 2004