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 A047078 #15 Sep 09 2017 23:19:56
%S A047078 29,59,137,149,179,239,269,419,431,521,569,599,659,809,1019,1031,1049,
%T A047078 1061,1151,1229,1289,1319,1619,1721,1931,1949,2027,2111,2129,2309,
%U A047078 2339,2549,2591,2729,2789,2969,2999,3119,3299,3329,3359,3371,3389,3539,3557
%N A047078 Primes at which difference pattern X2Y (X and Y >= 6) occurs in A001223.
%H A047078 Michael De Vlieger, <a href="/A047078/b047078.txt">Table of n, a(n) for n = 1..10000</a>
%e A047078 59 is here because 59 + 2 = 61 is prime, but the difference pattern around 59 is {[53] 6 [59] 2 [61] 6 [67]}.
%t A047078 Select[Prime@ Range[2, 500], Times @@ Boole@ {First@ # >= 6, #[[2]] == 2, Last@ # >= 6} == 1 &@ Differences@ Prime[# + Range[-1, 2]] &@ PrimePi@ # &] (* _Michael De Vlieger_, Jul 04 2016 *)
%Y A047078 Cf. A001223, A022008, A052160, A052162-A052168.
%K A047078 nonn
%O A047078 1,1
%A A047078 _Labos Elemer_, Jan 26 2000