A032067 Shifts left 2 places under "BGK" (reversible, element, unlabeled) transform.

1, 1, 1, 1, 2, 2, 4, 8, 12, 25, 43, 94, 177, 350, 702, 1413, 2954, 5963, 12333, 25625, 53069, 111201, 232727, 489177, 1032483, 2178467, 4617781, 9797643, 20844394, 44427033, 94824892, 202789246, 434245483, 931328024

Offset

1,5

Links

Andrew Howroyd, Table of n, a(n) for n = 1..200

C. G. Bower, Transforms (2)

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=vector(2-n%2, i, 1)); for(i=1, (n-1)\2, v=concat([1, 1], BGK(v))); v} \\ Andrew Howroyd, Sep 20 2018

Crossrefs

Sequence in context: A048114 A268691 A102456 * A337361 A153996 A123024

Adjacent sequences: A032064 A032065 A032066 * A032068 A032069 A032070

Keyword

nonn

Author

Christian G. Bower

Status

approved