This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A167483 #10 Mar 12 2013 04:10:34
%S A167483 3,5,257,2237,2377,2557,5557,33353,33377,73237,252233,252253,253573,
%T A167483 3533377,3533533,3555557,3577333,5375327,5375533,7725733,7737557,
%U A167483 7777337,37237523,37237573,37237723,37273237,37273337,55775227,527522777,527523223,527532553
%N A167483 Primes prime(n) such that n and prime(n) have only prime digits.
%C A167483 See A155088 for a table of the first 200 pairs (n, prime(n)). - _Giovanni Resta_, Mar 11 2013
%H A167483 Giovanni Resta, <a href="/A167483/b167483.txt">Table of n, a(n) for n = 1..200</a>
%e A167483 The prime prime(7235) = 73237 is in the sequence because 7235 and 73237 contain only prime digits. - _Giovanni Resta_, Mar 11 2013
%t A167483 pQ[n_] := Union[IntegerDigits@n, {2, 3, 5, 7}] == {2, 3, 5, 7}; Prime@
%t A167483 Select[Range[10^5], pQ@# && pQ@Prime@# &] (* _Giovanni Resta_, Mar 11 2013 *)
%Y A167483 Cf. A155088.
%K A167483 base,nonn
%O A167483 1,1
%A A167483 _Pierre CAMI_, Nov 04 2009
%E A167483 Corrected and extended by _Donovan Johnson_ and _Giovanni Resta_, Mar 11 2013