OFFSET
0,2
MATHEMATICA
Select[6^Range[0, 26], FreeQ[Differences[IntegerDigits[#]], 0]&] (* Harvey P. Dale, Jul 23 2018 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Sep 15 1999
STATUS
approved