A012897 sec(sin(x)+log(x+1))=1+4/2!*x^2-6/3!*x^3+91/4!*x^4-470/5!*x^5...

1, 0, 4, -6, 91, -470, 6004, -57057, 807281, -10925316, 181019254, -3109774415, 60388378207, -1243237163142, 27924671116008, -666732185288925, 17061240258678497, -462532118657434344, 13300045106193385114

Offset

0,3

Links

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

Mathematica

With[{nn=30}, CoefficientList[Series[Sec[Sin[x]+Log[x+1]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Oct 29 2011 *)

Crossrefs

Sequence in context: A101138 A222483 A245011 * A013079 A222495 A307101

Adjacent sequences: A012894 A012895 A012896 * A012898 A012899 A012900

Keyword

sign

Author

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

Status

approved