A167483 Primes prime(n) such that n and prime(n) have only prime digits.

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

Author

Pierre CAMI, Nov 04 2009

Keywords

• base
• nonn

Comments

See A155088 for a table of the first 200 pairs (n, prime(n)). - Giovanni Resta, Mar 11 2013

Examples

			The prime prime(7235) = 73237 is in the sequence because 7235 and 73237 contain only prime digits. - _Giovanni Resta_, Mar 11 2013
		

Links

• Giovanni Resta, Table of n, a(n) for n = 1..200

Crossrefs

Cf. A155088.

Programs

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 *)

Extensions

Corrected and extended by Donovan Johnson and Giovanni Resta, Mar 11 2013