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 A052162 #12 Aug 17 2023 21:38:53
%S A052162 79,127,163,379,397,439,487,499,673,739,757,769,907,937,967,1009,1213,
%T A052162 1549,1567,1579,1597,2203,2293,2347,2389,2437,2473,2539,2617,2749,
%U A052162 2833,2857,2953,3019,3037,3079,3187,3217,3319,3343,3613,3697,3793,3877,3907
%N A052162 Primes at which difference pattern X4Y (X and Y >= 6) occurs in A001223.
%H A052162 Michael De Vlieger, <a href="/A052162/b052162.txt">Table of n, a(n) for n = 1..10000</a>
%e A052162 127 is in the sequence because 127 + 4 = 131 is prime, but the difference pattern around 127 is {[113] 14 [127] 4 [131] 6 [137]}.
%t A052162 s = Differences@ Prime@ Range[600]; Prime@ Select[Position[s, 4][[All, 1]], And[s[[# - 1]] >= 6, s[[# + 1]] >= 6] &] (* _Michael De Vlieger_, Aug 17 2023 *)
%Y A052162 Cf. A001223, A052160, A052162-A052168, A022008, A047078.
%K A052162 nonn
%O A052162 1,1
%A A052162 _Labos Elemer_, Jan 26 2000