A095652 Fourth column of Salié-triangle A065547.

1, -6, 55, -736, 13573, -330058, 10233219, -393999940, 18443289777, -1031520165710, 67934648699151, -5203713576558056, 458704384454574365, -46104659405475675026, 5241286859201262537563, -669127269362962909934028, 95322254316544433430632009

Offset

0,2

Links

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

Formula

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

Mathematica

col = 4; 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

Cf. A065547.

Sequence in context: A243691 A151345 A281596 * A132689 A323876 A249672

Adjacent sequences: A095649 A095650 A095651 * A095653 A095654 A095655

Keyword

sign,easy

Author

Wolfdieter Lang, Jun 11 2004

Status

approved