|
|
A032243
|
|
"DHK" (bracelet, identity, unlabeled) transform of 1,0,1,0,... (odd).
|
|
1
|
|
|
1, 1, 0, 1, 1, 1, 1, 1, 2, 2, 3, 4, 8, 11, 18, 31, 48, 79, 123, 203, 315, 514, 791, 1278, 1983, 3169, 4922, 7832, 12206, 19333, 30215, 47757, 74816, 118125, 185423, 292674, 460279, 726599, 1144508, 1807639, 2851366, 4506371, 7117308
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,9
|
|
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/(1-x^2) + O(x*x^n), n)) \\ Andrew Howroyd, Sep 21 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|