login
A032237
Shifts left 2 places under "DGK" (bracelet, element, unlabeled) transform.
1
1, 1, 1, 1, 2, 2, 4, 6, 10, 17, 29, 53, 93, 169, 308, 566, 1068, 1975, 3742, 7061, 13427, 25634, 49151, 94474, 182262, 352361, 683304, 1327941, 2586839, 5049398, 9873715, 19343014, 37952032, 74584811, 146783263, 289264739
OFFSET
1,5
PROG
(PARI)
DGK(v)={apply(p->subst(serlaplace(p/y + polcoeff(p, 1) + polcoeff(p, 2)), 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], DGK(v))); v} \\ Andrew Howroyd, Sep 20 2018
CROSSREFS
Sequence in context: A293505 A032307 A007560 * A276061 A216958 A318849
KEYWORD
nonn,eigen
STATUS
approved