OFFSET
1,2
MATHEMATICA
Select[Table[k^k, {k, 20}], FreeQ[Differences[IntegerDigits[#]], 0]&] (* Harvey P. Dale, Aug 23 2019 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Sep 15 1999
EXTENSIONS
Since this is a list, it has offset 1 and does not contain any repeated terms. - N. J. A. Sloane, Aug 24 2019
STATUS
approved