%I#20 2017年10月29日21:47:00

%S 0,1，-1,0,2,8，-64，-11220648192，-157056，-598081607270480010240，

%电话：-2484268032，-135372472325064591298563160676007936，-135526008225792，

%电话：92945139322060845507663438741504

%N例如log（1+反弧（x））。

%H G.C.Greubel，n表，n=0..450的a（n）</a>

%F a（n）=n*求和{m=0..（n-1）/2}（2^（2*m-n）*（n-2*m）*（-1）^（n-m-1）*Sum_{i=0..2*m}（2^（i+n-2*m）*Stirling1（n-2*m+i，n-2*m）*二项式（n-1，n-2*m+i-1）/（n-2*m+i）！）/（n-2米）。

%t带[｛nn＝50｝，系数列表[系列[Log[1+ArcTan[x]]，｛x，0，nn｝]，x]*范围[0，nn]！]（*_G.C.格鲁贝尔，2017年9月6日*）

%o（最大值）

%o a（n）：=2*n*总和（（2^（-（n-2*m）-1）*（n-2*m）*（-1）^（n-m-1）*总和（（2^（i+n-2*m）*stirling1（n-2*m+i，n-2*m）*二项式（n-1，n-2*m+i-1））/（n-2*m+i）！，i、 0.2*m））/（n-2*m），m，0，（n-1）/2）；

%o（最大值）b[1]：1$b[n]：=总和（（-1）^（k+1）*b[n-1-2*k]/（2*k+1），k，0，楼层（n/2）-1）+（（%i）^（n-1）+（-%i）^（n-1））/2；

%o cons（0，名单（n-1）*b[n]，n，1100）；/*_Tani Akinari_，2017年10月30日*/

%o（PARI）x='x+o（'x^50）；concat（[0]，Vec（serlaplace（log（1+atan（x））））\\_G.C.Greubel_，2017年9月6日

%K符号

%0、5

%A _Vladimir Kruchinin，2011年6月12日