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 A069796 #5 Dec 26 2015 18:11:56 %S A069796 179,1091,1213,1279,3313,3637,4273,6637,8237,8293,8537,9137,9613, %T A069796 10937,12071,14071,15137,19237,19937,20639,21013,22817,22937,24091, %U A069796 24317,26713,28439,29137,29837,31379,32537,33037,33071,35339,36913,37117 %N A069796 Prime(n) and prime(n+4) use the same digits. %H A069796 Harvey P. Dale, <a href="/A069796/b069796.txt">Table of n, a(n) for n = 1..1000</a> %e A069796 6637 is a member as the fourth next prime 6673 uses the same digits. %t A069796 p = {0}; q = {1}; r = {1}; s = {1}; t = {1}; Do[ If[p == t, Print[ Prime[n - 5]]]; p = q; q = r; r = s; s = t; t = Sort[ IntegerDigits[ Prime[n]]], {n, 5 10^3}] %t A069796 Transpose[Select[Partition[Prime[Range[5000]],5,1],Sort[ IntegerDigits[ First[#]]] == Sort[IntegerDigits[Last[#]]]&]][[1]] (* _Harvey P. Dale_, Dec 26 2015 *) %Y A069796 Cf. A069793, A069567, A069794, A069795. %K A069796 base,nonn %O A069796 1,1 %A A069796 _Amarnath Murthy_, Apr 09 2002 %E A069796 Edited, corrected and extended by _Robert G. Wilson v_, Apr 12 2002