login
A032969
Numbers with the property that all pairs of consecutive base-6 digits differ by more than 1.
0
1, 2, 3, 4, 5, 9, 10, 11, 12, 16, 17, 18, 19, 23, 24, 25, 26, 30, 31, 32, 33, 54, 55, 59, 60, 61, 62, 66, 67, 68, 69, 74, 75, 76, 77, 96, 97, 98, 102, 103, 104, 105, 110, 111, 112, 113, 117, 118, 119, 138, 139, 140, 141, 146, 147, 148
OFFSET
1,2
MATHEMATICA
Select[Range[200], Min[Abs[Differences[IntegerDigits[#, 6]]]]>1&] (* Harvey P. Dale, May 29 2019 *)
CROSSREFS
Sequence in context: A194398 A047603 A047362 * A095906 A333050 A328119
KEYWORD
nonn,base
STATUS
approved