login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A114699 A000799(n) - A064355(n). 0
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 2, 0, 0, 3, 0, 0, 6, 0, 0, 10, 1, 0, 18, 0, 0, 36, 0, 0, 62, 0, 4, 113, 0, 0, 210, 6, 0, 391, 0, 0, 739, 0, 0, 1365, 2, 20, 2570, 0, 0, 4854, 37, 4, 9198, 0, 0, 17544, 0, 0, 33296, 0, 126, 63550, 0, 0, 121574, 248, 0, 233016, 0, 0, 447828, 0 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,15

COMMENTS

There was a suggestion that these were the same sequence, but they are not.

LINKS

Table of n, a(n) for n=0..75.

FORMULA

A000799(n) = A064355(n) just for: (1) n a power of 2. (2) n = p * 2^k, where p is a prime with p > 2^{2^k - k}. (Including the case k=0. ) (3) n = 9. -Franklin T. Adams-Watters, Feb 14 2006

MATHEMATICA

f[n_] := Block[{d = Select[Divisors@n, OddQ@# &]}, Floor[2^n/n] - Plus @@ (2^(n/d)*MoebiusMu@d)/n]; Array[f, 76] (* Robert G. Wilson v *)

CROSSREFS

Cf. A000799, A064355.

Sequence in context: A035377 A136274 A290976 * A182797 A212163 A212195

Adjacent sequences:  A114696 A114697 A114698 * A114700 A114701 A114702

KEYWORD

nonn

AUTHOR

Paul D. Hanna, Feb 20 2006

EXTENSIONS

More terms from Robert G. Wilson v, Feb 20 2006

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified September 26 06:24 EDT 2017. Contains 292502 sequences.