%I#5 2012年3月30日18:37:27
%第1,1,3,2439311043473041286013342315263942241478700774页,
%电话:315171596123875030510468876181963773726037574349,
%电话:21823808108907441711357654070089428439395164517573072391553388287162662084904168456543458529
%N G.f.满足:A(A(x))=Sum_{N>=1}A(N)*x^N/(1-N*x)^N,其中G.f.A(x。
%通用公式:A(x)=x+x^2+3*x^3+24*x^4+393*x^5+11043*x^6+。。。
%e其中
%e A(A(x))=x/(1-x)+x^2/(1-2*x)^2+3*x^3/a(n)*x^n/(1-n*x)^n+。。。
%e明确地说,
%e A(A(x))=x+2*x^2+8*x^3+64*x^4+972*x^5+25599*x^6+。。。
%o(PARI){a(n)=局部(a=[1],F=x,G=x);对于(i=1,n,a=concat(a,0);F=x*Ser(a);
%o G=总和(m=1,#A-1,A[m]*x^m/(1-m*x+x*o(x^#A))^m);
%o A[#A]=Vec(G)[#A]-Vec(子集(F,x,F))[#A]);如果(n<1.0,A[n])}
%Y参考A193209。
%K nonn公司
%氧1,3
%A _保罗·D·汉纳,2011年7月19日