OFFSET
1,4
LINKS
Andrew Howroyd, Table of n, a(n) for n = 1..200
C. G. Bower, Transforms (2)
FORMULA
"CFK" (necklace, size, unlabeled) transform of A032047 (shifted right one place).
PROG
(PARI)
BFK(v)={apply(p->subst(serlaplace(y^0*p + polcoeff(p, 1)), y, 1)/2, Vec(-1+prod(k=1, #v, 1 + v[k]*x^k*y + O(x*x^#v)), -#v))}
CFK(v)={apply(p->subst(serlaplace(p/y), y, 1), Vec(-1+prod(k=1, #v, 1 + v[k]*x^k*y + O(x*x^#v)), -#v))}
seq(n)={my(v=[1]); for(i=3, n, v=concat([1], BFK(v))); concat([1], CFK(v))} \\ Andrew Howroyd, Sep 20 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved