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 A155145 #11 Jul 01 2023 08:28:28
%S A155145 5051,6353,6961,7151,7547,8951,13451,22447,36847,49297,51061,51647,
%T A155145 52147,63649,68891,81049,81553,82651,91237,95747,108089,110647,110899,
%U A155145 117239,117851,122207,124753,125149,126517,136247,148549,153953,154747
%N A155145 Primes p such that p-+1, p-+3, p-+5 are not squarefree.
%H A155145 Harvey P. Dale, <a href="/A155145/b155145.txt">Table of n, a(n) for n = 1..1000</a>
%t A155145 <<NumberTheory`NumberTheoryFunctions` lst={};Do[p=Prime[n];If[ !SquareFreeQ[p-1]&&!SquareFreeQ[p+1]&&!SquareFreeQ[p-3]&&!SquareFreeQ[p+3]&&!SquareFreeQ[p-5]&&!SquareFreeQ[p+5],AppendTo[lst,p]],{n,3*7!}];lst
%t A155145 Select[Prime[Range[15000]],NoneTrue[#+{1,3,5,-1,-3,-5},SquareFreeQ]&] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Dec 05 2020 *)
%Y A155145 Cf. A153213, A049282, A155139, A155140, A155141, A155142, A155143
%K A155145 nonn
%O A155145 1,1
%A A155145 _Vladimir Joseph Stephan Orlovsky_, Jan 21 2009