A059126 A hierarchical sequence (W2{2} according to the description in the attached file - see link).
1, 2, 1, 3, 4, 3, 1, 2, 1, 5, 6, 5, 1, 2, 1, 3, 4, 3, 1, 2, 1, 7, 8, 7, 1, 2, 1, 3, 4, 3, 1, 2, 1, 5, 6, 5, 1, 2, 1, 3, 4, 3, 1, 2, 1, 9, 10, 9, 1, 2, 1, 3, 4, 3, 1, 2, 1, 5, 6, 5, 1, 2, 1, 3, 4, 3, 1, 2, 1, 7, 8, 7, 1, 2, 1, 3, 4, 3, 1, 2, 1, 5, 6, 5, 1, 2, 1, 3, 4, 3, 1, 2, 1, 11, 12, 11, 1, 2, 1, 3, 4, 3
Offset: 0
Links
- Antti Karttunen, Table of n, a(n) for n = 0..12287
- J. Wallgren, Hierarchical sequences
Programs
-
Mathematica
Array[IntegerExponent[2 #, 2] /. k_ :> ({# - 1, #, # - 1} &[2 k]) &, 36] // Flatten (* Michael De Vlieger, Nov 02 2018 *)
Formula
a(3n+1) = 2*A001511(1+n), a(3n) = a(3n+2) = a(3n+1) - 1. - Antti Karttunen, May 28 2017