OFFSET
1,2
COMMENTS
Absolute values are expansion of sinh(arcsin(x)).
LINKS
Muniru A Asiru, Table of n, a(n) for n = 1..100
FORMULA
E.g.f.: sin(arcsinh(x)) = x*sqrt(1+x^2)*(1 - 5*x^2/(G(0) + 5*x^2))); G(k) = (2*k+2)*(2*k+3) - x^2*(4*k^2+8*k+5) + x^2*(2*k+2)*(2*k+3)*(4*k^2+16*k+17)/G(k+1);
for sinh(arcsin(x)) = x*sqrt(1-x^2)*(1 + 5*x^2/(G(0) - 5*x^2))); G(k) = (2*k+2)*(2*k+3) + x^2*(4*k^2+8*k+5) - x^2*(2*k+2)*(2*k+3)*(4*k^2+16*k+17)/G(k+1); (continued fraction). - Sergei N. Gladkovskii, Dec 19 2011
G.f.: 1 + x*(G(0) - 1)/(x-1) where G(k) = 1 + (4*k^2+4*k+2)/(1-x/(x - 1/G(k+1) )); (continued fraction). - Sergei N. Gladkovskii, Jan 15 2013
a(n) ~ (-1)^(n+1) * cosh(Pi/2) * 2^(2*n-1) * n^(2*n-2) / exp(2*n). - Vaclav Kotesovec, Oct 23 2013
|a(n+2)| = Product_{k=0..n} ((2k+1)^2+1). - Andrew Slattery, Jul 03 2022
EXAMPLE
sin(arcsinh(x)) = x - 2x^3/3! + 20x^5/5! - 520x^7/7! + 26000x^9/9! - ...
MAPLE
seq(coeff(series(factorial(n)*sin(arcsinh(x)), x, n+1), x, n), n=1..30, 2); # Muniru A Asiru, Jul 22 2018
MATHEMATICA
Table[n!*SeriesCoefficient[Sin[ArcSinh[x]], {x, 0, n}], {n, 1, 40, 2}] (* Vaclav Kotesovec, Oct 23 2013 *)
CROSSREFS
KEYWORD
sign
AUTHOR
Ralf Stephan, Dec 28 2004
EXTENSIONS
Name corrected by Andrew Slattery, Jul 03 2022
STATUS
approved