login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A056791 Weight of binary expansion of n + length of binary expansion of n. 4
1, 2, 3, 4, 4, 5, 5, 6, 5, 6, 6, 7, 6, 7, 7, 8, 6, 7, 7, 8, 7, 8, 8, 9, 7, 8, 8, 9, 8, 9, 9, 10, 7, 8, 8, 9, 8, 9, 9, 10, 8, 9, 9, 10, 9, 10, 10, 11, 8, 9, 9, 10, 9, 10, 10, 11, 9, 10, 10, 11, 10, 11, 11, 12, 8, 9, 9, 10, 9, 10, 10, 11, 9, 10, 10, 11, 10, 11, 11, 12, 9, 10, 10, 11, 10, 11, 11 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

LINKS

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

Ralf Stephan, Some divide-and-conquer sequences ...

Ralf Stephan, Table of generating functions

Index to sequences related to the complexity of n

FORMULA

a(n) = a((n - n mod 2) / (2 - n mod 2)) + 1 for n>0, a(0)=1. - Reinhard Zumkeller, Jul 29 2002

a(2n) = a(n)+1, a(2n+1) = a(n)+2. G.f.: 1 + 1/(1-x) * sum(k>=0, (2t+t^2)/(1+t), t=x^2^k). For n>0, a(n) = 2*A000120(n) + A080791(n) = A000120(n) + A029837(n). - Ralf Stephan, Jun 14 2003

EXAMPLE

12 = 1100 in binary, so a(12)=2+4=6.

MATHEMATICA

Table[If[n==0, 1, s=IntegerDigits[n, 2]; Total@s+Length@s], {n, 0, 100}] (* Giorgos Kalogeropoulos, Sep 13 2021 *)

PROG

(PARI) a(n) = if (n==0, 1, my(b=binary(n)); vecsum(b) + #b); \\ Michel Marcus, Sep 13 2021

(Python)

def a(n): b = bin(n)[2:]; return b.count('1') + len(b)

print([a(n) for n in range(87)]) # Michael S. Branicky, Sep 13 2021

CROSSREFS

Equals A056792 + 1.

Equals A014701 + 2.

Cf. A061313, A037861.

Sequence in context: A172006 A172005 A200247 * A333262 A218767 A334863

Adjacent sequences:  A056788 A056789 A056790 * A056792 A056793 A056794

KEYWORD

nonn,easy,base

AUTHOR

N. J. A. Sloane, Sep 01 2000

EXTENSIONS

More terms from James A. Sellers, Sep 06 2000 and from David W. Wilson, Sep 07 2000

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 4 16:09 EDT 2022. Contains 357239 sequences. (Running on oeis4.)