Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #7 Oct 09 2017 09:06:31
%S 1,5,-60,2700,-164160,13374720,-1317409920,151766835840,
%T -19941590880000,2939103216990720,-479988532980633600,
%U 86040885120291532800,-16800662989461441945600,3550863374378300399616000,-807913791223460628810301440,196952399633420675888256368640
%N G.f.: A(x) satisfies: A( 7*x - 6*A(x) ) = x - 25*x^2.
%H Vaclav Kotesovec, <a href="/A293454/b293454.txt">Table of n, a(n) for n = 1..300</a>
%F a(n) ~ (-1)^n * c * (30/log(6))^n * n! / n^(2/3 + 3*log(6)/5), where c = 0.03826354730535151243617...
%o (PARI) {a(n) = my(A=x, V=[1, 5]); for(i=1, n, V = concat(V, 0); A=x*Ser(V); V[#V] = Vec( subst(A, x, 7*x - 6*A) )[#V]/5 ); V[n]}
%o for(n=1, 30, print1(a(n), ", "))
%Y Cf. A291198, A292812, A292813, A292814, A293455, A293456.
%K sign
%O 1,2
%A _Vaclav Kotesovec_, Oct 09 2017