|
|
A032244
|
|
"DHK" (bracelet, identity, unlabeled) transform of 0,1,1,1,...
|
|
2
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,6
|
|
LINKS
|
|
|
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^2/(1-x) + O(x*x^n), n))} \\ Andrew Howroyd, Sep 21 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|