|
|
A032162
|
|
Shifts left 2 places under "CGK" (necklace, element, unlabeled) transform.
|
|
1
|
|
|
1, 1, 1, 1, 2, 2, 4, 7, 11, 21, 36, 72, 131, 250, 479, 924, 1832, 3553, 7039, 13952, 27720, 55482, 111199, 223683, 451416, 912333, 1850179, 3758123, 7652318, 15609910, 31896318, 65290662, 133841148, 274787842, 564923951
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,5
|
|
LINKS
|
|
|
PROG
|
(PARI)
CGK(v)={apply(p->subst(serlaplace(p/y), 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], CGK(v))); v} \\ Andrew Howroyd, Sep 20 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|