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 A167705 #16 Aug 03 2014 14:35:08 %S A167705 26,34,50,56,64,76,86,92,93,94,116,117,118,119,120,121,122,123,124, %T A167705 134,142,143,144,145,146,154,160,170,176,184,185,186,187,188,202,203, %U A167705 204,205,206,207,208,214,215,216,217,218,219,220,236,244,245,246,247,248,254,260,266,274,286,287,288,289,290,296,297,298,299,300 %N A167705 Composite numbers having four composite nearest neighbors. %C A167705 Almost all natural numbers are members of this sequence. %H A167705 Harvey P. Dale, <a href="/A167705/b167705.txt">Table of n, a(n) for n = 1..10000</a> %e A167705 a(1)=26 (24,25,27,28 are composite nearest neighbors), a(2)=34 (32,33,35,36 are composite nearest neighbors). %t A167705 Select[Range[6!], !PrimeQ[#]&&!PrimeQ[#-1]&&!PrimeQ[#+1]&&!PrimeQ[#-2]&&!PrimeQ[#+2]&] (* _Vladimir Joseph Stephan Orlovsky_, Dec 26 2010 *) %t A167705 Flatten[Position[Partition[PrimeQ[Range[310]],5,1],_?(Union[#]=={False}&),{1},Heads->False]]+2 (* _Harvey P. Dale_, Nov 01 2013 *) %o A167705 (PARI) for(n=4,1e4,if(n-precprime(n)>2&&nextprime(n)-n>2,print1(n","))) %Y A167705 Cf. A002808, A079364. %K A167705 nonn,easy %O A167705 1,1 %A A167705 _Juri-Stepan Gerasimov_, Nov 10 2009 %E A167705 Comment and program from _Charles R Greathouse IV_, Nov 12 2009 %E A167705 Corrected terms, Clark Kimberling and Joerg Arndt, Jun 24 2011.