A129629 Nonzero bisection of Moebius transform of A082392.

1, 1, 3, 7, 14, 31, 63, 123, 255, 511, 1015, 2047, 4092, 8176, 16383, 32767, 65503, 131061, 262143, 524223, 1048575, 2097151, 4194162, 8388607, 16777208, 33554175, 67108863, 134217693, 268434943, 536870911, 1073741823

Offset

1,3

Comments

Possibly identical to A011947.

Links

Table of n, a(n) for n=1..31.

Formula

a(n) = 2^n-A138944(n) - M. F. Hasler, May 03 2008 (sequence number appears to be in error, Joerg Arndt, Mar 25 2013)

Prog

(PARI) A129629(Nmax=100)={ local( d=2*Nmax+3, b=Vec( sum( k=0, log(d)\log(2), (x^2^k)/(1-2*x^2^(k+1)), O(x^d)))); vector( Nmax, i, sumdiv(i*2-1, k, moebius((i*2-1)/k)*b[k])) } \\  M. F. Hasler, May 03 2008

Crossrefs

Sequence in context: A036892 A123707 A011947 * A354463 A223136 A354603

Adjacent sequences: A129626 A129627 A129628 * A129630 A129631 A129632

Keyword

nonn

Author

Ralf Stephan, May 31 2007

Status

approved