login
A050752
Fifth powers containing no pair of consecutive equal digits.
1
0, 1, 32, 243, 1024, 3125, 16807, 32768, 59049, 161051, 371293, 537824, 759375, 1048576, 1419857, 4084101, 5153632, 6436343, 7962624, 9765625, 14348907, 17210368, 28629151, 39135393, 45435424, 52521875, 69343957, 79235168
OFFSET
0,3
MATHEMATICA
Select[Range[0, 50]^5, FreeQ[Differences[IntegerDigits[#]], 0]&] (* Harvey P. Dale, Dec 31 2020 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Sep 15 1999
STATUS
approved