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 A153214 #9 Jul 01 2023 08:28:24
%S A153214 47,1447,1847,3701,6653,11273,14947,15727,17053,18493,21661,24923,
%T A153214 26647,29153,32789,33023,38873,39323,42437,42923,44053,47527,47977,
%U A153214 49853,52027,52153,56747,56873,59929,71147,74189,79427,80953,99277,99713
%N A153214 Primes p such that p+-2 and p+-3 are not squarefree.
%t A153214 lst={};Do[p=Prime[n];If[ !SquareFreeQ[p-2]&&!SquareFreeQ[p+2]&&!SquareFreeQ[p-3]&&!SquareFreeQ[p+3],AppendTo[lst,p]],{n,3*7!}];lst
%t A153214 Select[Prime[Range[10000]],NoneTrue[#+{-3,-2,2,3},SquareFreeQ]&] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Aug 27 2019 *)
%Y A153214 Cf. A049282, A049097, A039787, A075432, A153207, A153208, A153209, A153210, A153213
%K A153214 nonn
%O A153214 1,1
%A A153214 _Vladimir Joseph Stephan Orlovsky_, Dec 20 2008