A154129 a(n) = (A132207(n)-1)/3.
0, 1, 2, 6, 3, 7, 4, 8, 5, 9, 10, 26, 11, 27, 12, 28, 13, 29, 14, 30, 15, 31, 16, 32, 17, 33, 18, 34, 19, 35, 20, 36, 21, 37, 22, 38, 23, 39, 24, 40, 25, 41, 42, 106, 43, 107, 44, 108, 45, 109, 46, 110, 47, 111, 48, 112, 49, 113, 50, 114, 51, 115, 52, 116, 53, 117, 54, 118, 55, 119, 56, 120, 57, 121, 58, 122, 59
Offset: 0
Crossrefs
Cf. A132207.
Programs
-
Maple
A132207 := proc(n) L := [] ; for k from 0 to (2*4^n-1)/2 do L := [op(L),2*4^n+3*k-1,5*4^n+3*k-1] ; end do: end proc: for n from 0 to 3 do L := A132207(n) ; for l in L do printf("%d,",(l-1)/3) ; end do: end do: # R. J. Mathar, Sep 26 2011
Comments