A253606 Numbers n such that digits of n are not present in n^8.

3, 4, 8, 9, 22, 33, 43, 54, 59, 73, 222, 233, 353, 712, 777, 22224

Offset

1,1

Comments

a(17) > 10^9.

Links

Table of n, a(n) for n=1..16.

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

Cf. A111116, A253577.

Sequence in context: A245282 A320355 A113057 * A258640 A345223 A185726

Adjacent sequences: A253603 A253604 A253605 * A253607 A253608 A253609

Keyword

nonn,base,more

Author

Chai Wah Wu, Jan 05 2015

Status

approved