A012778 Expansion of e.g.f. sec(sec(x)*log(x+1)).

1, 0, 1, -3, 28, -160, 1630, -14700, 180668, -2227608, 32850740, -507842060, 8829277928, -162974579040, 3280768459280, -70166399557800, 1609085392223312, -39068177212368192, 1006531896581760976

Offset

0,4

Links

Robert Israel, Table of n, a(n) for n = 0..299

Example

1 + (1/2!)*x^2 - (3/3!)*x^3 + (28/4!)*x^4 - (160/5!)*x^5 + ...

Maple

N:= 300: # number of terms desired
S:= series(sec(sec(x)*log(x+1)), x, N):
seq(coeff(S, x, j)*j!, j=0 .. N-1);
# Robert Israel, Feb 17 2013

Crossrefs

Sequence in context: A378934 A184440 A012762 * A302522 A303405 A074922

Adjacent sequences: A012775 A012776 A012777 * A012779 A012780 A012781

Keyword

sign

Author

Patrick Demichel (patrick.demichel(AT)hp.com)

Status

approved