login
A032978
Numbers with the property that all pairs of consecutive base-7 digits differ by 0 or 1.
0
1, 2, 3, 4, 5, 6, 7, 8, 9, 15, 16, 17, 23, 24, 25, 31, 32, 33, 39, 40, 41, 47, 48, 49, 50, 56, 57, 58, 64, 65, 66, 105, 106, 107, 113, 114, 115, 121, 122, 123, 162, 163, 164, 170, 171, 172, 178, 179, 180, 219, 220, 221, 227, 228, 229
OFFSET
1,2
MATHEMATICA
Select[Range[250], Max[Abs[Differences[IntegerDigits[#, 7]]]]<2&] (* Harvey P. Dale, Jul 25 2011 *)
CROSSREFS
Cf. A007093.
Sequence in context: A190298 A069118 A328933 * A197181 A260352 A049101
KEYWORD
nonn,base
STATUS
approved