|
| |
|
|
A079330
|
|
Numerators of coefficients of odd powers of 1/q in the solution series for Tan[x]/x=1.
|
|
1
| |
|
|
1, 2, 13, 146, 781, 16328, 6316012, 38759594, 9655714457, 50134571594, 25626917879, 638499558282328, 125381104727404588, 435948294065152496, 146414084312394268792, 1076603090723736731974978
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| Series contributed by David W. Cantrell.
|
|
|
LINKS
| Eric Weisstein's World of Mathematics, Tanc Function
|
|
|
MATHEMATICA
| Last/@Partition[CoefficientList[InverseSeries[Series[x+Cot[x], {x, 0, 50}], q], 1/q], 2]
|
|
|
CROSSREFS
| Denominators are in A088989.
Sequence in context: A046245 A178248 A107699 * A059367 A204554 A069736
Adjacent sequences: A079327 A079328 A079329 * A079331 A079332 A079333
|
|
|
KEYWORD
| nonn,frac
|
|
|
AUTHOR
| Eric Weisstein (eric(AT)weisstein.com), Jan 03, 2003
|
| |
|
|
