|
|
A253577
|
|
Primes p such that digits of p do not appear in p^8.
|
|
2
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
a(7) > 10^7.
|
|
LINKS
|
|
|
EXAMPLE
|
3 and 3^8 = 6561 have no digits in common, hence 3 is in the sequence.
|
|
MATHEMATICA
|
Select[Prime[Range[1000000]], Intersection[IntegerDigits[#], IntegerDigits[#^8]]=={} &]
|
|
PROG
|
(Python)
from sympy import isprime
A253577_list = [n for n in range(1, 10**6) if set(str(n)) & set(str(n**8)) == set() and isprime(n)]
|
|
CROSSREFS
|
Cf. similar sequences listed in A253574.
|
|
KEYWORD
|
nonn,base,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|