A032029 Shifts left twice under "AGK" (ordered, elements, unlabeled) transform.

1, 1, 1, 1, 3, 3, 7, 17, 27, 67, 129, 301, 671, 1429, 3291, 7371, 16947, 38863, 88829, 206869, 478833, 1116729, 2613945, 6121019, 14417407, 33963057, 80262149, 190121337, 450986551, 1072398607, 2553394331, 6090283079

Offset

1,5

Links

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

C. G. Bower, Transforms (2)

Prog

(PARI)
AGK(v)={apply(p->subst(serlaplace(y^0*p), y, 1), 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], AGK(v))); v} \\ Andrew Howroyd, Sep 20 2018

Crossrefs

Sequence in context: A104176 A032294 A146034 * A058571 A058492 A221303

Adjacent sequences: A032026 A032027 A032028 * A032030 A032031 A032032

Keyword

nonn,eigen

Author

Christian G. Bower

Status

approved