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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A117123 n minus the number of 0's in binary expansion of n. 0
1, 1, 3, 2, 4, 5, 7, 5, 7, 8, 10, 10, 12, 13, 15, 12, 14, 15, 17, 17, 19, 20, 22, 21, 23, 24, 26, 26, 28, 29, 31, 27, 29, 30, 32, 32, 34, 35, 37, 36, 38, 39, 41, 41, 43, 44, 46, 44, 46, 47, 49, 49, 51, 52, 54, 53, 55, 56, 58, 58, 60, 61, 63, 58, 60, 61, 63, 63, 65, 66, 68, 67, 69 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,3

LINKS

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

MATHEMATICA

f[n_] := n - Count[IntegerDigits[n, 2], 0]; Array[f, 73]

Table[n-DigitCount[n, 2, 0], {n, 80}] (* Harvey P. Dale, Dec 24 2015 *)

CROSSREFS

Cf. A011371, A037861.

Sequence in context: A036812 A039906 A056011 * A116966 A182187 A163241

Adjacent sequences:  A117120 A117121 A117122 * A117124 A117125 A117126

KEYWORD

easy,nonn,base

AUTHOR

Robert G. Wilson v, Apr 19 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
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 26 06:48 EDT 2019. Contains 321481 sequences. (Running on oeis4.)