|
Search: id:A102074
|
|
|
| A102074 |
|
Denominators of e.g.f. sec(arcosh(x)) = cosec(arsinh(x)). |
|
+0
2
|
|
| 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; listen)
|
|
|
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 this_sequence A126227 A024189 A007451
Adjacent sequences: A102071 A102072 A102073 this_sequence 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
|
|
|
Search completed in 0.002 seconds
|
