login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

tan(arcsin(x)-sin(x)) = 2/3!*x^3+8/5!*x^5+226/7!*x^7+15504/9!*x^9...
0

%I #11 Feb 29 2016 12:43:39

%S 0,2,8,226,15504,1188706,148306520,26128271170,5977691158048,

%T 1757745580960834,644493123719650472,287811224662750272034,

%U 153933334239209991266992,97140471618560380314609826

%N tan(arcsin(x)-sin(x)) = 2/3!*x^3+8/5!*x^5+226/7!*x^7+15504/9!*x^9...

%F a(n) ~ c * (2*n)! / sqrt(n), where c = 1/(sqrt(Pi) * (sin(sin(1)))^2) = 1.0148109425617531683... . - _Vaclav Kotesovec_, Feb 29 2016

%t nn = 20; Table[(CoefficientList[Series[Cot[ArcCos[x] + Sin[x]], {x, 0, 2*nn+1}], x] * Range[0, 2*nn+1]!)[[n]], {n, 2, 2*nn, 2}] (* _Vaclav Kotesovec_, Feb 06 2015 *)

%K nonn

%O 0,2

%A Patrick Demichel (patrick.demichel(AT)hp.com)

%E a(0)=0 prepended by _Vaclav Kotesovec_, Feb 06 2015

%E Definition modified by _Vaclav Kotesovec_, Feb 06 2015