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 A048401 #25 Jun 16 2021 02:12:38
%S A048401 2,3,5,7,37,59,73,151,373,15959,95959,515951,595159,595951,9515959,
%T A048401 51515159,159595151,159595951,5151515951,5159515159,5159515951,
%U A048401 5951515151,5951515951,5959515151,5959595951,15151595951,15951515159
%N A048401 Primes with consecutive digits that differ exactly by 4.
%H A048401 Sean A. Irvine, <a href="/A048401/b048401.txt">Table of n, a(n) for n = 1..1000</a>
%t A048401 pd[{a_,b_,c___}]:=Flatten[Table[Select[FromDigits/@Select[Tuples[ {a,b,c},n],Union[Abs[Differences[#]]]=={4}&],PrimeQ],{n,11}]]; Union[Join[{2,3,5,7},pd[{1,5,9}],pd[{3,7}]]] (* _Harvey P. Dale_, Aug 23 2011 *)
%Y A048401 Cf. A048398, A048399, A048400, A048402, A048403, A048404, A048405, A048406.
%K A048401 nonn,base
%O A048401 1,1
%A A048401 _Patrick De Geest_, Apr 15 1999
%E A048401 More terms from _Naohiro Nomoto_, Jul 28 2001