login
A048410
Numbers whose consecutive digits differ by 8.
6
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,3
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 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Apr 15 1999
STATUS
approved