login
A279307
Numerators of coefficients in expansion of (sinh x)/(1 + cos(sqrt(x))).
1
0, 1, 1, 5, 137, 647, 22951, 328201, 26965819, 135880897, 37044323689, 91760237711, 250120070812867, 235374750708709, 38112363401091809, 1747698886011364219, 2880212454433162868027, 1444514603466022486187, 54349494835431693600323
OFFSET
0,4
LINKS
EXAMPLE
(0/1) + (1/2)x + (1/8)x^2 + (5/48)x^3 + ... ; 0/1, 1/2, 1/8, 5/48, ... = A279307/A279239.
MATHEMATICA
z = 30; t = CoefficientList[Series[Sinh[x]/(1 + Cos[Sqrt[x]]), {x, 0, z}], x];
Numerator[t] (* A279307 *)
Denominator[t] (* A279239 *)
CROSSREFS
Cf. A279239.
Sequence in context: A215958 A216337 A142294 * A265875 A248523 A159546
KEYWORD
nonn,easy,frac
AUTHOR
Clark Kimberling, Dec 11 2016
STATUS
approved