|
|
A012353
|
|
Expansion of e.g.f. arcsin(tan(x) * log(x+1)).
|
|
0
|
|
|
0, 0, 2, -3, 16, -50, 440, -2856, 30896, -291528, 3760768, -47794120, 742773920, -11810509776, 214335913584, -4059112319640, 84773616869376, -1860974227719872, 44081861972926464, -1097880401356246656, 29109695232734355712, -810074412297240074880
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
EXAMPLE
|
2/2!*x^2 - 3/3!*x^3 + 16/4!*x^4 - 50/5!*x^5 ...
|
|
MATHEMATICA
|
With[{nn=30}, Drop[CoefficientList[Series[ArcSin[Tan[x]Log[x+1]], {x, 0, nn}], x] Range[0, nn]!, 2]] (* Harvey P. Dale, Jul 01 2017 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Patrick Demichel (patrick.demichel(AT)hp.com)
|
|
EXTENSIONS
|
a(0) and a(1) inserted and title improved by Sean A. Irvine, Jul 18 2018
|
|
STATUS
|
approved
|
|
|
|