OFFSET
0,3
MATHEMATICA
Select[Range[0, 90]^9, FreeQ[Differences[IntegerDigits[#]], 0]&] (* Harvey P. Dale, Dec 27 2011 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Sep 15 1999
STATUS
approved