A032806 Numbers whose set of base-6 digits is {2,3}.

2, 3, 14, 15, 20, 21, 86, 87, 92, 93, 122, 123, 128, 129, 518, 519, 524, 525, 554, 555, 560, 561, 734, 735, 740, 741, 770, 771, 776, 777, 3110, 3111, 3116, 3117, 3146, 3147, 3152, 3153, 3326, 3327, 3332, 3333, 3362, 3363, 3368

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..2000

Index entries for 6-automatic sequences.

Mathematica

Flatten[Table[FromDigits[#, 6]&/@Tuples[{2, 3}, n], {n, 5}]] (* Vincenzo Librandi, May 26 2012 *)

Prog

(Magma) [n: n in [1..8000] | Set(IntegerToSequence(n, 6)) subset {2, 3}]; // Vincenzo Librandi, May 26 2012
(Magma) [n eq 1 select 2 else IsOdd(n) select 6*Self(Floor(n/2))+2 else Self(n-1)+1: n in [1..45]]; // Bruno Berselli, May 27 2012

Crossrefs

Sequence in context: A206578 A056435 A244295 * A353870 A225756 A260143

Adjacent sequences: A032803 A032804 A032805 * A032807 A032808 A032809

Keyword

nonn,base,easy

Author

Clark Kimberling

Status

approved