|
| |
|
|
A089311
|
|
Write n in binary; a(n) = number of 0's in right-most block of zeros, after dropping any trailing 0's.
|
|
0
| |
|
|
0, 0, 0, 0, 0, 1, 0, 0, 0, 2, 1, 1, 0, 1, 0, 0, 0, 3, 2, 2, 1, 1, 1, 1, 0, 2, 1, 1, 0, 1, 0, 0, 0, 4, 3, 3, 2, 1, 2, 2, 1, 2, 1, 1, 1, 1, 1, 1, 0, 3, 2, 2, 1, 1, 1, 1, 0, 2, 1, 1, 0, 1, 0, 0, 0, 5, 4, 4, 3, 1, 3, 3, 2, 2, 1, 1, 2, 1, 2, 2, 1, 3, 2, 2, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 0, 4, 3, 3
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,10
|
|
|
EXAMPLE
| 9 = 1001 so a(9) = 2.
|
|
|
PROG
| (PARI) a(n)=local(b, c, s):b=binary(n):c=length(b):while(!b[c], c=c-1):while(c>0&&b[c], c=c-1): if(c<=0, 0, s=0:while(!b[c], c=c-1:s=s+1):s) (from R. Stephan)
|
|
|
CROSSREFS
| Cf. A089309-A089313. Different from A086784.
Sequence in context: A057516 A178471 A160381 * A086784 A104162 A145679
Adjacent sequences: A089308 A089309 A089310 * A089312 A089313 A089314
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com), Dec 22 2003
|
|
|
EXTENSIONS
| More terms from R. Stephan, Feb 01 2004
|
| |
|
|
