A033081 Numbers in which all pairs of consecutive base-10 digits differ by 3.

1, 2, 3, 4, 5, 6, 7, 8, 9, 14, 25, 30, 36, 41, 47, 52, 58, 63, 69, 74, 85, 96, 141, 147, 252, 258, 303, 363, 369, 414, 474, 525, 585, 630, 636, 696, 741, 747, 852, 858, 963, 969, 1414, 1474, 2525, 2585, 3030, 3036, 3630, 3636, 3696

Offset: 1

Author

Clark Kimberling

Keywords

• nonn
• base

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..200

Programs

Mathematica

Join[Range[9],Select[Range[4000],Union[Abs[Differences[ IntegerDigits[ #]]]] == {3}&]] (* Harvey P. Dale, Mar 10 2016 *)