login
A009197
Expansion of exp(log(1+x)/cosh(x)).
2
1, 1, 0, -3, -6, 35, 135, -476, -6300, 14349, 298515, 254056, -26673042, -26975169, 1931306377, 16803854768, -336040323112, -1435742838615, 20743481564487, 843925791375728, -11354618863953550, -37784454009996005
OFFSET
0,4
LINKS
FORMULA
a(n) ~ n! * (-1)^n / (GAMMA(-1/cosh(1)) * n^(1+1/cosh(1))). - Vaclav Kotesovec, Jul 02 2015
MATHEMATICA
CoefficientList[Series[Exp[Log[1+x]/Cosh[x]], {x, 0, 20}], x] * Range[0, 20]! (* Vaclav Kotesovec, Jul 02 2015 *)
CROSSREFS
Sequence in context: A143046 A246069 A228279 * A205336 A184390 A359424
KEYWORD
sign,easy
AUTHOR
EXTENSIONS
Extended with signs by Olivier Gérard, Mar 15 1997
STATUS
approved