A279210 Length of second run of 1's in binary expansion of n.

0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 1, 2, 0, 1, 0, 0, 0, 1, 1, 2, 1, 1, 2, 3, 0, 1, 1, 2, 0, 1, 0, 0, 0, 1, 1, 2, 1, 1, 2, 3, 1, 1, 1, 1, 2, 2, 3, 4, 0, 1, 1, 2, 1, 1, 2, 3, 0, 1, 1, 2, 0, 1, 0, 0, 0, 1, 1, 2, 1, 1, 2, 3, 1, 1, 1, 1, 2, 2, 3, 4, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 4, 5, 0, 1, 1, 2, 1

Offset: 0

Author

N. J. A. Sloane, Dec 22 2016

Keywords

• nonn
• base

Examples

			46 = 101110_2 so a(46) = 3.
		

Links

• Michael De Vlieger, Table of n, a(n) for n = 0..10000

Crossrefs

Cf. A090996, A279209.

Programs

Mathematica

Table[First[Map[Length, Rest@ DeleteCases[#, w_ /; First@ w == 0] &@ Split@ IntegerDigits[n, 2]] /. {} -> {0}], {n, 100}] (* Michael De Vlieger, Dec 23 2016 *)

Formula

a(2*n) = a(n). - David A. Corneth, Oct 12 2018

Extensions

More terms from Michael De Vlieger, Dec 23 2016