A279243 - OEIS

A279243

Denominators of coefficients in expansion of (sin x)/(1 + cos(sqrt(x))).

1, 2, 8, 16, 5760, 26880, 14515200, 958003200, 55794106368, 41845579776000, 25609494822912000, 4865804016353280000, 2997335274073620480000, 1240896803466478878720000, 537721948168807514112000000, 26512029966235987869696000000

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

OFFSET

0,2

LINKS

Clark Kimberling, Table of n, a(n) for n = 0..1000

EXAMPLE

(0/1) + (1/2)x + (1/8)x^2 - (1/16)x^3 - (103/5760)x^3 + ... ; 1/2, 1/3, 1/8, -1/16, ... = A279242/A279243.

MATHEMATICA

z = 26; t = CoefficientList[Series[Sin[x]/(1 + Cos[Sqrt[x]]), {x, 0, z}], x];

Numerator[t] (* A279242 *)

Denominator[t] (* A279243 *)

CROSSREFS

Cf. A279242.

Sequence in context: A308613 A006573 A009662 * A162218 A103086 A192155

Adjacent sequences: A279240 A279241 A279242 * A279244 A279245 A279246

KEYWORD

nonn,easy,frac

AUTHOR

Clark Kimberling, Dec 11 2016

STATUS

approved