OFFSET
1,1
LINKS
Andrew Howroyd, Table of n, a(n) for n = 1..200
C. G. Bower, Transforms (2)
FORMULA
Doubles (index 2+) under "BGK" (reversible, element, unlabeled) transform.
PROG
(PARI)
BGK(v)={apply(p->subst(serlaplace(y^0*p + polcoeff(p, 1)), y, 1)/2, Vec(prod(k=1, #v, (1 + x^k*y + O(x*x^#v))^v[k])-1, -#v))}
seq(n)={my(v=[2]); for(i=2, n, v=concat(v, BGK(concat(v, [0]))[i])); v} \\ Andrew Howroyd, Sep 20 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved