A048410 Numbers whose consecutive digits differ by 8.

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 19, 80, 91, 191, 808, 919, 1919, 8080, 9191, 19191, 80808, 91919, 191919, 808080, 919191, 1919191, 8080808, 9191919, 19191919, 80808080, 91919191, 191919191, 808080808, 919191919, 1919191919, 8080808080

Offset: 0

Author

Patrick De Geest, Apr 15 1999

Keywords

• nonn
• base

Crossrefs

Cf. A033075, A033088, A033081, A048407-A048409.

Programs

Mathematica

With[{nn=10},Join[Range[0,9],Table[FromDigits[PadRight[{},n,{1,9}]],{n,nn}], Table[FromDigits[PadRight[{},m,{9,1}]],{m,nn}],Table[ FromDigits[ PadRight[ {},k,{8,0}]],{k,nn}]]]//Union (* Harvey P. Dale, Jul 17 2017 *)