(PARI){a(n)=(6*n+1)*(7*n+1”)^(n-2)*8^n}
对于(n=0,20,print1(a(n),“,”)
(PARI){a(n)=局部(G=1,a=1);对于(i=0,n,G=1+x*G^8+x*O(x^n));
A=(serreverse(x*G^7/exp(56*x*G*7))/x)^(1/7);n*波尔科夫(A,n)}
对于(n=0,20,print1(a(n),“,”)
(岩浆)[0..50]]中的[(6*n+1)*(7*n+1)^(n-2)*8^n:n//G.C.格鲁贝尔2017年11月14日