A033068 Numbers with the property that all pairs of consecutive base-3 digits differ by 1.

1, 2, 3, 5, 7, 10, 16, 21, 23, 30, 32, 48, 50, 64, 70, 91, 97, 145, 151, 192, 194, 210, 212, 273, 275, 291, 293, 435, 437, 453, 455, 577, 583, 631, 637, 820, 826, 874, 880, 1306, 1312, 1360, 1366, 1731, 1733, 1749, 1751, 1893, 1895, 1911, 1913, 2460, 2462, 2478

Offset: 1

Author

Clark Kimberling

Keywords

• nonn
• base

Links

• Amiram Eldar, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A007089.

Programs

Mathematica

Join[Range[2],Select[Range[2000],Union[Abs[Differences[IntegerDigits[#,3]]]]=={1}&]] (* Harvey P. Dale, Dec 28 2011 *)