A223898 E.g.f.: A(x) = Sum_{n>=0} (-log(1 - sin(n*x)))^n/n!.

1, 1, 5, 52, 856, 20085, 628312, 25055966, 1233216256, 73098133289, 5118532806056, 416870672801592, 38985244916105216, 4141541451563589853, 495220504149290732672, 66125635675588398919594, 9792116564535122048290816, 1598380441085583646763663697

Offset

0,3

Links

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

Example

 E.g.f.: A(x) = 1 + x + 5*x^2/2! + 52*x^3/3! + 856*x^4/4! + 20085*x^5/5! +...
where
A(x) = 1 - log(1-sin(x)) + log(1-sin(2*x))^2/2! - log(1-sin(3*x))^3/3! + log(1-sin(4*x))^4/4! - log(1-sin(5*x))^5/5! + log(1-sin(6*x))^6/6! +...

Prog

 (PARI) {a(n)=local(A=1+x); for(i=1, n, A=1+sum(m=1, n, (-log(1-sin(m*x+x*O(x^n))))^m/m!)); n!*polcoeff(A, n)}
for(n=0, 20, print1(a(n), ", "))

Crossrefs

Cf. A223896, A223897.

Sequence in context: A357346 A196531 A108459 * A210096 A076281 A099977

Adjacent sequences: A223895 A223896 A223897 * A223899 A223900 A223901

Keyword

nonn

Author

Paul D. Hanna, Mar 28 2013

Status

approved