A242007 G.f. satisfies: A(x) = 1 - x + A(x)^3 - A(x*A(x)^3).

1, 1, 0, 2, 13, 195, 3435, 76414, 2022174, 62187697, 2179140792, 85721566443, 3740826531268, 179358254323264, 9372717617658837, 530222429589968085, 32283696960793539142, 2105064707592004243848, 146354134558836060119604, 10807595142239085940171930

Offset

0,4

Links

Vaclav Kotesovec, Table of n, a(n) for n = 0..360

Formula

a(n) ~ c * 3^n * n^(n - 1 - 2/3*log(2)) / (exp(n) * (log(2))^n), where c = 0.056839945305333083135569...

Prog

(PARI) {a(n)=local(A=1+x); for(i=1, n, A = 2*A - (1-x + A^3 - subst(A, x, x*A^3 +x*O(x^n))) ); polcoeff(A, n)}
for(n=0, 20, print1(a(n), ", "))

Crossrefs

Cf. A242008 (q=4), A242009 (q=5).

Sequence in context: A371318 A323209 A239994 * A376550 A049512 A003507

Adjacent sequences: A242004 A242005 A242006 * A242008 A242009 A242010

Keyword

nonn

Author

Vaclav Kotesovec, Aug 11 2014

Extensions

Name corrected by Vaclav Kotesovec and Paul D. Hanna, Aug 15 2014

Status

approved