%I#24 2018年7月21日20:54:52
%S 1,1,-3,-3665,-2503160789313065717,-3684215119322746228337,
%电话:2173907680851,-53174843178099301007358319257596489,
%电话:46704901267812186793,-1118289381845780582299475449747424429277597236190513381,19349766542166780916394521759
%N例如f.的膨胀:1/cos(tanh(x))(仅适用于均匀诱导系数)。
%H G.C.Greubel,n表,n=0..200的a(n)
%e1/cos(tanhx)=1+1*x^2/2-3*x^4/4-3*x^6/6+665*x^8/8-25031*x^10/10!+…=1+x^2/2-x^4/8-x^6/240+19*x^8/1152-25031*x^10/3628800+。。。
%t f[x_]:=秒@Tanh[x] ;表[导数[2*n][f][0],{n,0,16}](*_Arkadiusz-Wesolowski_,2012年8月18日*)
%t带有[{nmax=50},系数列表[Series[1/(Cos[Tanh[x]]),{x,0,nmax}],x]*Range[0,nmax]!][[1;;-1;;2]](*_G.C.格鲁贝尔,2018年7月21日*)
%o(PARI)x='x+o('x^50);v=Vec(塞拉普拉斯(1/cos(tanh(x)));向量(#v\2,n,v[2*n-1])\\_G.C.Greubel_,2018年7月21日
%K符号
%0、3
%A·R·H·哈丁_
%E Lended with signs by _Livier Gérard_1997年3月15日
%E a(15),a(16),来自_Arkadiusz Wesolowski,2012年8月18日