OFFSET
1,1
COMMENTS
a(17) > 10^9.
EXAMPLE
4^8 = 65536 which does not contain the digit 4.
MATHEMATICA
a253606[n_] := Block[{f},
f[x_] := MemberQ[IntegerDigits[x^8], #] & /@ IntegerDigits[x];
Select[Range@n, DeleteDuplicates@f[#] == {False} &]]; a253606[10^5] (* Michael De Vlieger, Jan 06 2015 *)
PROG
(Python)
A253606_list = [n for n in range(1, 10**6) if set(str(n)) & set(str(n**8)) == set()]
CROSSREFS
KEYWORD
nonn,base,more
AUTHOR
Chai Wah Wu, Jan 05 2015
STATUS
approved