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

1, 2, 3, 4, 5, 6, 7, 9, 15, 17, 23, 25, 31, 33, 39, 41, 47, 50, 64, 66, 105, 107, 121, 123, 162, 164, 178, 180, 219, 221, 235, 237, 276, 278, 292, 333, 335, 350, 352, 448, 450, 464, 466, 736, 750, 752, 848, 850, 864, 866, 1134, 1136

Offset

1,2

Links

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

Mathematica

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

Crossrefs

Sequence in context: A281809 A143286 A160339 * A030287 A271950 A263482

Adjacent sequences: A033069 A033070 A033071 * A033073 A033074 A033075

Keyword

nonn,base

Author

Clark Kimberling

Status

approved