%I #13 Jun 23 2015 21:43:04
%S 0,1,-1,5,-12,89,-345,3093,-17136,182097,-1334025,16371365,-150969324,
%T 2101489961,-23556117585,367038504693,-4870660226880,84100519126561,
%U -1293871061371761,24562906630580293,-430689316852061740
%N Expansion of log(1+x)/cos(sinh(x)).
%F a(n) ~ (n-1)! * (-1)^(n+1) / cos(sinh(1)). - _Vaclav Kotesovec_, Jan 24 2015
%t Log[ 1+x ]/Cos[ Sinh[ x ] ]
%t CoefficientList[Series[Log[1 + x]*Sec[Sinh[x]], {x, 0, 20}], x] * Range[0, 20]! (* _Vaclav Kotesovec_, Jan 24 2015 *)
%K sign,easy
%O 0,4
%A _R. H. Hardin_
%E Extended with signs by _Olivier GĂ©rard_, Mar 15 1997