A032244 "DHK" (bracelet, identity, unlabeled) transform of 0,1,1,1,...

1, 0, 1, 1, 1, 2, 2, 3, 3, 5, 5, 8, 10, 16, 21, 37, 51, 86, 127, 211, 319, 523, 796, 1288, 1988, 3180, 4928, 7844, 12212, 19346, 30222, 47771, 74823, 118140, 185431, 292690, 460287, 726616, 1144517, 1807657, 2851375, 4506390, 7117318

Offset: 0

Author

Christian G. Bower

Keywords

• nonn

Links

• Andrew Howroyd, Table of n, a(n) for n = 0..500
• C. G. Bower, Transforms (2)

Programs

PARI

DHK(p,n)={my(q=((1+p)^2/(1-subst(p, x, x^2))-1)/2); p + (p^2-subst(p, x, x^2))/2 + sum(d=1, n, moebius(d)*(log(subst(1/(1+O(x*x^(n\d))-p), x, x^d))/d - subst(q + O(x*x^(n\d)), x, x^d)))/2}
seq(n)={Vec(1 + DHK(x^2/(1-x) + O(x*x^n), n))} \\ Andrew Howroyd, Sep 21 2018

Extensions

a(0)=1 prepended by Andrew Howroyd, Sep 21 2018