OFFSET
0,4
COMMENTS
A(1/2) = Sum_{n>=0} 1/2^(n + A003188(n)) = 1.3146990537656455533266364007421...
LINKS
Paul D. Hanna, Table of n, a(n) for n = 0..1024
EXAMPLE
G.f.: A(x) = 1 + x - 2*x^3 + 2*x^4 - 5*x^5 + 9*x^6 - 3*x^7 - 13*x^8 + 14*x^9 +...
where A(x) = A(1-x) equals the series:
A(x) = 1 + x*(1-x) + x^2*(1-x)^3 + x^3*(1-x)^2 + x^4*(1-x)^6 + x^5*(1-x)^7 + x^6*(1-x)^5 + x^7*(1-x)^4 + x^8*(1-x)^12 + x^9*(1-x)^13 + x^10*(1-x)^15 + x^11*(1-x)^14 + x^12*(1-x)^10 + x^13*(1-x)^11 + x^14*(1-x)^9 + x^15*(1-x)^8 +...
PROG
(PARI) {a(n)=polcoeff(sum(m=0, n, x^m*(1-x+x*O(x^n))^bitxor(m, m\2)), n)}
for(n=0, 64, print1(a(n), ", "))
(PARI) {a(n) = sum(k=0, n, (-1)^(n-k)*binomial(bitxor(k, k\2), n-k))}
for(n=0, 64, print1(a(n), ", "))
CROSSREFS
KEYWORD
sign
AUTHOR
Paul D. Hanna, Jul 14 2013
STATUS
approved