login
A033085
Numbers in which all pairs of consecutive base-7 digits differ by 2.
0
1, 2, 3, 4, 5, 6, 10, 14, 18, 22, 26, 30, 34, 38, 46, 71, 75, 100, 128, 132, 157, 185, 210, 214, 242, 267, 271, 324, 328, 500, 528, 700, 704, 896, 900, 928, 1100, 1104, 1296, 1300, 1472, 1500, 1504, 1696, 1700, 1872, 1900, 2268
OFFSET
1,2
MATHEMATICA
Join[Range[6], Select[Range[2500], Union[Abs[Differences[IntegerDigits[#, 7]]]] == {2}&]] (* Harvey P. Dale, Jun 30 2022 *)
CROSSREFS
Sequence in context: A128945 A318533 A048569 * A332320 A349862 A006543
KEYWORD
nonn,base
STATUS
approved