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 A178648 #12 May 09 2023 12:56:11
%S A178648 5,7,13,31
%N A178648 Primes p such that primorial(p)/2 +- 2 are primes.
%C A178648 No further terms up to the 500th prime, i.e., 3571. - _Harvey P. Dale_, May 09 2023
%H A178648 Carlos Rivera, <a href="https://www.primepuzzles.net/puzzles/puzz_974.htm">Puzzle 974. More twins like these...</a>, The Prime Puzzles & Problems Connection.
%e A178648 3*5 = 15; 15-2 and 15+2 are primes.
%t A178648 pp=1;lst={};Do[p=Prime[n];pp*=p;If[PrimeQ[pp-2]&&PrimeQ[pp+2],Print[Date[],p];AppendTo[lst,p]],{n,2,4!}];lst
%t A178648 Module[{nn=15,pr,pm},pr=Prime[Range[nn]];pm=FoldList[Times,pr];Select[Thread[ {pr,pm}],AllTrue[ #[[2]]/2+{2,-2},PrimeQ]&]][[;;,1]] (* _Harvey P. Dale_, May 09 2023 *)
%Y A178648 Cf. A070826, A178641, A178642.
%Y A178648 Intersection of A096177 and A096547.
%K A178648 nonn,more
%O A178648 1,1
%A A178648 _Vladimir Joseph Stephan Orlovsky_, May 31 2010