A032973 Numbers with the property that all pairs of consecutive digits differ by more than 1.

1, 2, 3, 4, 5, 6, 7, 8, 9, 13, 14, 15, 16, 17, 18, 19, 20, 24, 25, 26, 27, 28, 29, 30, 31, 35, 36, 37, 38, 39, 40, 41, 42, 46, 47, 48, 49, 50, 51, 52, 53, 57, 58, 59, 60, 61, 62, 63, 64, 68, 69, 70, 71, 72, 73, 74, 75, 79, 80, 81, 82, 83, 84

Offset

1,2

Links

Table of n, a(n) for n=1..63.

Mathematica

Select[Range[100], Min[Abs[Differences[IntegerDigits[#]]]]>1&] (* Harvey P. Dale, May 29 2021 *)

Crossrefs

Sequence in context: A342951 A342264 A094823 * A174887 A092598 A247811

Adjacent sequences: A032970 A032971 A032972 * A032974 A032975 A032976

Keyword

nonn,base

Author

Clark Kimberling

Status

approved