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 A220488 #11 Oct 01 2013 15:26:08
%S A220488 13,17,29,31,43,47,59,67,71,79,83,97,113,127,131,137,139,151,157,163,
%T A220488 167,173,179,193,197,211,229,239,241,251,263,269,271,281,283,293,311,
%U A220488 313,317,331,347,349,359,367,379,383,389,397,421,431,433,439
%N A220488 Primes that have both prime digits (2,3,5,7) and nonprime digits (1,4,6,8,9), without digits "0".
%C A220488 For similar sequences see A152426 and A152427.
%H A220488 Harvey P. Dale, <a href="/A220488/b220488.txt">Table of n, a(n) for n = 1..1000</a>
%t A220488 pdnpdQ[n_]:=Module[{idn=IntegerDigits[n],p,z=DigitCount[n,10,0]},p=Count[ idn,_?PrimeQ];p>0&&z==0&&Length[idn]>p]; Select[ Prime[ Range[ 150]], pdnpdQ] (* _Harvey P. Dale_, Oct 01 2013 *)
%Y A220488 Cf. A018252, A019546, A034844, A038618, A087363, A092621, A092626, A152312, A152313, A152426, A152427.
%K A220488 nonn,base,easy
%O A220488 1,1
%A A220488 _Omar E. Pol_, Feb 01 2013