login
Primes p such that digits of p do not appear in p^8.
2

%I #14 Jan 08 2015 17:36:44

%S 3,43,59,73,233,353

%N Primes p such that digits of p do not appear in p^8.

%C a(7) > 10^7.

%C Subsequence of A253606. a(7) > 10^9. - _Chai Wah Wu_, Jan 05 2015

%e 3 and 3^8 = 6561 have no digits in common, hence 3 is in the sequence.

%t Select[Prime[Range[1000000]], Intersection[IntegerDigits[#], IntegerDigits[#^8]]=={} &]

%o (Python)

%o from sympy import isprime

%o A253577_list = [n for n in range(1,10**6) if set(str(n)) & set(str(n**8)) == set() and isprime(n)]

%o # _Chai Wah Wu_, Jan 05 2015

%Y Cf. similar sequences listed in A253574.

%K nonn,base,more

%O 1,1

%A _Vincenzo Librandi_, Jan 04 2015