A136004 a(n) = A005811(n) + 4.
4, 5, 6, 5, 6, 7, 6, 5, 6, 7, 8, 7, 6, 7, 6, 5, 6, 7, 8, 7, 8, 9, 8, 7, 6, 7, 8, 7, 6, 7, 6, 5, 6, 7, 8, 7, 8, 9, 8, 7, 8, 9, 10, 9, 8, 9, 8, 7, 6, 7, 8, 7, 8, 9, 8, 7, 6, 7, 8, 7, 6, 7, 6, 5, 6, 7, 8, 7, 8, 9, 8, 7, 8, 9, 10, 9, 8, 9, 8, 7, 8, 9, 10, 9, 10, 11, 10, 9, 8, 9, 10, 9, 8, 9
Offset: 0
Keywords
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..5000
- Jeffrey Shallit, The mathematics of Per Noergaard's rhythmic infinity system, Fib. Q., 43 (2005), 262-268.
Crossrefs
Cf. A005811.
Programs
-
Mathematica
Table[Length@ Split@ IntegerDigits[n, 2] - Boole[n == 0] + 4, {n, 0, 93}] (* Michael De Vlieger, Sep 05 2017 *)
Comments