|
| |
|
|
A102074
|
|
Denominators of e.g.f. sec(arcosh(x)) = cosec(arsinh(x)).
|
|
1
| |
|
|
3, 3, 63, 9, 11, 63, 63, 9, 3591, 693, 2277, 189, 189, 21, 7161, 77, 21, 3591, 171, 99, 625779, 47817, 68103, 1323, 297, 297, 16929, 171, 531, 64449, 64449, 99, 3203739, 4347, 147609, 118503, 39501, 39501, 44793, 891, 913, 208593, 29799, 15939
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| sec(arcosh(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}] (from Robert G. Wilson v Jan 12 2005)
|
|
|
CROSSREFS
| Numerators are in A102073. Differs from A102065.
Sequence in context: A165497 A051752 A102065 * A126227 A024189 A007451
Adjacent sequences: A102071 A102072 A102073 * A102075 A102076 A102077
|
|
|
KEYWORD
| nonn,frac
|
|
|
AUTHOR
| Ralf Stephan, Dec 31 2004
|
|
|
EXTENSIONS
| Corrected and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 12 2005
|
| |
|
|
