OFFSET
0,3
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..10000
FORMULA
a(n) = A018882(n)^10. - Seiichi Manyama, Jan 31 2017
MATHEMATICA
Join[{0}, Module[{nn=150, tp}, tp=Range[nn]^10; Table[SelectFirst[tp, Take[ IntegerDigits[#], IntegerLength[ n]]==IntegerDigits[n]&], {n, 16}]]//Quiet] (* Harvey P. Dale, Apr 04 2024 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
Added initial 0. - Seiichi Manyama, Jan 31 2017
STATUS
approved