Voozh

A202622

Denominators of coefficients in Taylor series expansion of log(cotan(x)*arcsinh(x)) (even powers only).

1, 2, 60, 18, 22680, 85050, 52123500, 3831077250, 142098138000, 325641566250, 58468943220187500, 27563930375231250, 798802702274201625000, 3634552295347617393750, 1801743872907365887500, 14229272236285922096531250, 13586109131205798417768037500000, 43305722855718482456635619531250

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,2

LINKS

Table of n, a(n) for n=0..17.

EXAMPLE

-1/2*x^2-1/60*x^4-1/18*x^6+347/22680*x^8-1531/85050*x^10+590267/52123500*x^12+...

MATHEMATICA

Take[CoefficientList[Series[Log[Cot[x]ArcSinh[x]], {x, 0, 40}], x], {1, -1, 2}]//Denominator (* Harvey P. Dale, Jul 12 2023 *)

CROSSREFS

Cf. A012868.

Sequence in context: A050283 A096758 A262638 * A113549 A268432 A385636