%I#17 2018年7月2日22:38:07
%S 0,0,0,1,0,0720576025920864002376005702401235520892045440,
%电话:1334824920010675716480060492459456062212057728010344007402560,
%电话:3447995955840024928970490633600546446134633639680628158621748748904050248811434961280
%N阶N置换的次数正好是7。
%H Alois P.Heinz,n的表格,n=1..200时的a(n)</a>
%例如:-exp(x)+exp(x+1/7*x^7)_Alois P.Heinz,2013年2月16日
%p a:=proc(n)选项记忆;
%p`如果`(n<7,0,a(n-1)+(1+a(n-7))*(n-1/(n-7)!)
%p端:
%p序列(a(n),n=1..30);#_Alois P.Heinz,2013年2月16日
%t Rest[系数列表[系列[-Exp[x]+Exp[x+1/7*x^7],{x,0,25}],x]*范围[0,25]!](*_G.C.格鲁贝尔,2016年8月27日*)
%o(PARI)seq(n)={Vec(serlaplace(-exp(x+o(x*x^n))+exp
%Y列k=A057731的7。-_Alois P.Heinz,2013年2月16日
%K nonn公司
%O 1,7型
%A_Franz Vrabec,2009年1月1日
%E来自_Alois P.Heinz的更多条款,2013年2月16日
|