OFFSET
0,6
FORMULA
E.g.f. A(x) satisfies A'(x) = A(x) * (A(x) + A(i*x) + A(-x) + A(-i*x))/4, where i is the imaginary unit.
PROG
(PARI) a_vector(n) = my(v=vector(n+1)); v[1]=1; for(i=1, n, v[i+1]=sum(j=0, (i-1)\4, binomial(i-1, 4*j)*v[4*j+1]*v[i-4*j])); v;
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Jul 14 2025
STATUS
approved
