login

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

Expansion of e.g.f. arcsin(tan(x) * log(x+1)).
0

%I #10 Jul 18 2018 18:50:14

%S 0,0,2,-3,16,-50,440,-2856,30896,-291528,3760768,-47794120,742773920,

%T -11810509776,214335913584,-4059112319640,84773616869376,

%U -1860974227719872,44081861972926464,-1097880401356246656,29109695232734355712,-810074412297240074880

%N Expansion of e.g.f. arcsin(tan(x) * log(x+1)).

%e 2/2!*x^2 - 3/3!*x^3 + 16/4!*x^4 - 50/5!*x^5 ...

%t 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 *)

%K sign

%O 0,3

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

%E a(0) and a(1) inserted and title improved by _Sean A. Irvine_, Jul 18 2018