|
%I #9 Jun 18 2015 16:36:00
%S 1,5040,76281004800,37626350120206848000,
%T 185657801986983855655526400000,
%U 5150422429203073500358041285476352000000,569512147150397429576160463881863910421954560000000,199607288101583292042564550150623446229209414764068864000000000
%N E.g.f. satisfies: A(x) = Integral 1 + A(x)^7 dx.
%H Vaclav Kotesovec, <a href="/A259112/b259112.txt">Table of n, a(n) for n = 0..64</a>
%F a(n) ~ 7^(7*n+7/3) * n^(1/6) * (sin(Pi/7)/Pi)^(7*n+7/6) * (7*n)! / (6^(1/6) * Gamma(1/6)).
%o (PARI) {a(n) = local(A=x); A = serreverse( intformal( 1/(1 + x^7 + O(x^(7*n+2))) ) ); (7*n+1)!*polcoeff(A, 7*n+1)}
%o for(n=0, 20, print1(a(n), ", ")) \\ after _Paul D. Hanna_
%Y Cf. A258880 (k=3), A258901 (k=4), A258925 (k=5), A258927 (k=6), A259113 (k=8).
%K nonn
%O 0,2
%A _Vaclav Kotesovec_, Jun 18 2015
| 