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 A048402 #17 Jun 16 2021 02:12:33 %S A048402 2,3,5,7,61,83,383,727,72727,94949,1616161,383838383,727272727, %T A048402 383838383838383,38383838383838383,72727272727272727, %U A048402 94949494949494949,383838383838383838383 %N A048402 Primes with consecutive digits that differ exactly by 5. %H A048402 Harvey P. Dale, <a href="/A048402/b048402.txt">Table of n, a(n) for n = 1..30</a> %t A048402 Module[{nn=50,w1,w2},w1=Flatten[Table[Select[FromDigits/@Table[ PadRight[ {},n,{a,a+5}],{n,2,nn}],PrimeQ],{a,4}]];w2=Flatten[Table[Select[ FromDigits/@ Table[PadRight[{},n,{a+5,a}],{n,2,nn}],PrimeQ],{a,4}]];Join[ {2,3,5,7},w1,w2]//Union] (* _Harvey P. Dale_, Jan 09 2021 *) %Y A048402 Cf. A048398, A048399, A048400, A048401, A048403, A048404, A048405, A048407. %K A048402 nonn,base %O A048402 1,1 %A A048402 _Patrick De Geest_, Apr 15 1999