login
A167483
Primes prime(n) such that n and prime(n) have only prime digits.
2
3, 5, 257, 2237, 2377, 2557, 5557, 33353, 33377, 73237, 252233, 252253, 253573, 3533377, 3533533, 3555557, 3577333, 5375327, 5375533, 7725733, 7737557, 7777337, 37237523, 37237573, 37237723, 37273237, 37273337, 55775227, 527522777, 527523223, 527532553
OFFSET
1,1
COMMENTS
See A155088 for a table of the first 200 pairs (n, prime(n)). - Giovanni Resta, Mar 11 2013
LINKS
EXAMPLE
The prime prime(7235) = 73237 is in the sequence because 7235 and 73237 contain only prime digits. - Giovanni Resta, Mar 11 2013
MATHEMATICA
pQ[n_] := Union[IntegerDigits@n, {2, 3, 5, 7}] == {2, 3, 5, 7}; Prime@
Select[Range[10^5], pQ@# && pQ@Prime@# &] (* Giovanni Resta, Mar 11 2013 *)
CROSSREFS
Cf. A155088.
Sequence in context: A058846 A268535 A268695 * A101331 A232239 A087368
KEYWORD
base,nonn
AUTHOR
Pierre CAMI, Nov 04 2009
EXTENSIONS
Corrected and extended by Donovan Johnson and Giovanni Resta, Mar 11 2013
STATUS
approved