A012903 Expansion of e.g.f.: cos(arcsin(x)+log(x+1))=1-4/2!*x^2+6/3!*x^3-11/4!*x^4+10/5!*x^5...

1, 0, -4, 6, -11, 10, 20, -735, 6325, -72900, 677450, -8170525, 88464325, -1197032850, 15007986500, -229038025125, 3278247987625, -56064152729000, 903660871343750, -17171288454601125, 308020615136820625

Offset

0,3

Links

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

Mathematica

With[{nn=20}, CoefficientList[Series[Cos[ArcSin[x]+Log[x+1]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Aug 28 2024 *)

Crossrefs

Sequence in context: A109378 A132149 A129235 * A273103 A187215 A365647

Adjacent sequences: A012900 A012901 A012902 * A012904 A012905 A012906

Keyword

sign

Author

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

Extensions

Definition clarified by Harvey P. Dale, Aug 28 2024

Status

approved