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

1, 1, 1, 2, 2, 3, 4, 6, 10, 19, 35, 68, 133, 259, 500, 976, 1868, 3609, 6911, 13296, 25456, 48925, 93786, 180326, 346432, 667009, 1284331, 2477342, 4781021, 9240027, 17870724, 34604082, 67058896, 130085007, 252545177, 490722360

Offset

0,4

Links

Andrew Howroyd, Table of n, a(n) for n = 0..500

C. G. Bower, Transforms (2)

Prog

(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/(1-x) + O(x*x^n), n))} \\ Andrew Howroyd, Sep 21 2018

Crossrefs

Sequence in context: A284908 A329695 A103599 * A013588 A108150 A066015

Adjacent sequences: A032242 A032243 A032244 * A032246 A032247 A032248

Keyword

nonn

Author

Christian G. Bower

Extensions

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

Status

approved