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 A158284 #13 Dec 04 2017 18:28:21 %S A158284 3,5,5,7,13,15,23,25,29,31,43,45,53,55,73,75,83,85,89,91,103,105,109, %T A158284 111,113,115,163,165,173,175,193,195,223,225,229,231,233,235,263,265, %U A158284 283,285,293,295,313,315,353,355,373,375,383,385,389,391,409,411,433 %N A158284 List of pairs p, p+2 where p is prime and p and p+2 contain the same number of prime digits. %C A158284 Prime digits are 2, 3, 5 or 7. %t A158284 snpdQ[n_]:=Count[IntegerDigits[n],_?PrimeQ]==Count[IntegerDigits[n+2], _?PrimeQ]; {#,#+2}&/@Select[Prime[Range[100]],snpdQ]//Flatten (* _Harvey P. Dale_, Dec 04 2017 *) %Y A158284 Cf. A077800. %K A158284 nonn,base,less %O A158284 1,1 %A A158284 _Juri-Stepan Gerasimov_, Mar 15 2009 %E A158284 (13,15) inserted, (23,25) inserted, and all other numbers replaced by _R. J. Mathar_, May 19 2010 %E A158284 Definition changed to match the terms by _N. J. A. Sloane_, Dec 03 2017