login
A032252
"DHK" (bracelet, identity, unlabeled) transform of 2,1,1,1,...
2
1, 2, 2, 3, 4, 7, 17, 39, 102, 258, 651, 1620, 4028, 9956, 24588, 60742, 150108, 371689, 921822, 2291257, 5706077, 14240518, 35607189, 89202758, 223857382, 562716179, 1416686294, 3571809027, 9017514253, 22794726763
OFFSET
0,2
LINKS
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+x/(1-x) + O(x*x^n), n))} \\ Andrew Howroyd, Sep 21 2018
CROSSREFS
Sequence in context: A281723 A011784 A302487 * A112708 A320009 A147558
KEYWORD
nonn
EXTENSIONS
a(0)=1 prepended by Andrew Howroyd, Sep 21 2018
STATUS
approved