|
%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
|
