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 A052167 #6 Dec 11 2013 10:54:04
%S A052167 1481,21011,22271,55331,144161,165701,166841,195731,201821,225341,
%T A052167 247601,268811,326141,347981,361211,397751,465161,518801,536441,
%U A052167 633461,633791,661091,768191,795791,829721,857951,876011,958541,1008851
%N A052167 Primes at which difference pattern X2424Y (X and Y >= 6) occurs in A001223.
%e A052167 21011 is here because 21011+{2,2+4,2+4+2,2+4+2+4}=21011+{1,6,8,12}= {21013,21013,21017,21019,21023} are consecutive primes but the primes in the immediate neighborhood (21001 and 21031) are in distance 10 and 8. Thus the d-pattern "around 21011" is {10,2,4,2,4,12}.
%t A052167 patQ[n_]:=Module[{d=Differences[n]},First[d]>5&&Last[d]>5&&Most[ Rest[d]] == {2,4,2,4}]; Transpose[Select[Partition[Prime[ Range[ 80000]],7,1],patQ]] [[2]] (* _Harvey P. Dale_, Dec 11 2013 *)
%Y A052167 A001223, A052160, A052162-A052168, A022008, A047078.
%K A052167 nonn
%O A052167 1,1
%A A052167 _Labos Elemer_, Jan 26 2000