A012406 - OEIS

%I #6 Apr 07 2018 13:23:08

%S 1,0,0,0,12,-60,90,-420,21728,-270144,1479240,-9807600,330821832,

%T -6651092448,71604108576,-744095308320,20714430198528,

%U -548875353239424,9233126375705280,-138948347142163584

%N Expansion of e.g.f.: sec(arctan(x)*log(x+1))=1+12/4!*x^4-60/5!*x^5+90/6!*x^6-420/7!*x^7...

%t With[{nn=20},CoefficientList[Series[Sec[ArcTan[x]Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Apr 07 2018 *)

%K sign

%O 0,5

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

%E Definition clarified by _Harvey P. Dale_, Apr 07 2018