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 A176141 #3 Mar 31 2012 12:38:35
%S A176141 29002021,110196277,118389143,212660647,300782527,327385951,360369421,
%T A176141 375338729,385025777,488642647,494501773,557565221,637805153,
%U A176141 765921647,768588851,801954479,816239747,821097653,858454951,882772679,930996623
%N A176141 Primes p such that p+-1, p+-2, p+-3 and p+-4 are not squarefree.
%t A176141 f[n_]:=Max[Last/@FactorInteger[n]];lst={};Do[p=Prime[n];If[f[p-2]>1&&f[p-1]>1&&f[p+1]>1&&f[p+2]>1&&f[p-3]>1&&f[p+3]>1&&f[p-4]>1&&f[p+4]>1,AppendTo[lst,p]],{n,6*10!}];lst
%Y A176141 Cf. A013929, A166003
%K A176141 nonn
%O A176141 1,1
%A A176141 _Vladimir Joseph Stephan Orlovsky_, Apr 09 2010
%E A176141 More terms from _Zak Seidov_, Apr 10 2010