OFFSET
1,1
EXAMPLE
sec(arccosh(x)) = 1/x + x/3 - 1/3*x^3/3! + 220/63*x^5/5! -...
MATHEMATICA
t = Denominator[(Range[90] - 1)!CoefficientList[ Series[ Csc[ ArcSinh[x]], {x, 0, 90}], x]]; Table[ t[[n]], {n, 2, 90, 2}] (* Robert G. Wilson v, Jan 12 2005 *)
CROSSREFS
KEYWORD
nonn,frac
AUTHOR
Ralf Stephan, Dec 31 2004
EXTENSIONS
Corrected and extended by Robert G. Wilson v, Jan 12 2005
STATUS
approved