OFFSET
0,2
COMMENTS
a(n) = b[n, 0, 1] in A157285.
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..85
FORMULA
0 = +a(n)*(+a(n+1)*(+2*a(n+3)) +a(n+2)*(-6*a(n+2) +a(n+3))) +a(n+1)*(+a(n+1)*(+4*a(n+2) - 4*a(n+3)) +a(n+2)*(+4*a(n+2))) for all n in Z.
MATHEMATICA
a[ n_] := If[n < 0, 0, QPochhammer[2, 2, n] (-2)^n / n!];
PROG
(PARI) {a(n) = if( n<0, 0, prod(k=1, n, 2^k - 1) * 2^n / n!)};
(Magma) [1] cat [(&*[(2*k-1): k in [1..n]])*2^n/Factorial(n): n in [1..20]]; // G. C. Greubel, Jul 28 2018
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Michael Somos, Jun 06 2018
STATUS
approved