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 A155008 #4 May 27 2020 14:59:39
%S A155008 3,5,7,11,19,29,31,59,101,139,239,271,829,1031,1201,1439,1511,1531,
%T A155008 2251,2609,3929,4349,4969,5449,5639,5711,5801,5881,5981,6521,6569,
%U A155008 6701,6949,6959,8221,8831,9001,9181,9209,9419,9511,9929,10139,10711,11839,11981
%N A155008 Primes p such that (p-a)*(p+a)-+a*p are primes,a=4.
%C A155008 3*11-28=5, 3*11+28=61, ...
%t A155008 lst={};Do[p=Prime[n];If[PrimeQ[(p-4)*(p+4)-4*p]&&PrimeQ[(p-4)*(p+4)+4*p],AppendTo[lst,p]],{n,7!}];lst
%t A155008 Select[Prime[Range[1500]],AllTrue[(#-4)(#+4)+{4#,-4#},PrimeQ]&] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, May 27 2020 *)
%Y A155008 Cf. A125272, A053184, A038872, A141158, A038615, A098058, A038936, A089270, A140559, A154939, A155006, A155007
%K A155008 nonn
%O A155008 1,1
%A A155008 _Vladimir Joseph Stephan Orlovsky_, Jan 18 2009