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 A134797 #7 Mar 11 2014 01:34:10 %S A134797 23,37,47,53,67,79,83,89,97,113,127,131,157,163,167,173,211,223,233, %T A134797 251,257,263,277,293,307,317,331,337,353,359,367,373,379,383,389,397, %U A134797 401,409,439,443,449,457,467,479,487,491,499,503,509,541,547,557,563,577 %N A134797 Odd isolated primes. %H A134797 Omar E. Pol, <a href="http://www.polprimos.com">Determinacion geometrica de los numeros primos y perfectos</a>. %F A134797 a(n) = A007510(n+1). %F A134797 a(n) ~ n log n. - _Charles R Greathouse IV_, Jun 07 2013 %t A134797 Flatten[Select[Split[Prime[Range[106]], #2 - #1 < 4 &], Length[#] == 1 &]] (* _Jayanta Basu_, Jun 07 2013 *) %o A134797 (PARI) select(p->!isprime(p-2)&&!isprime(p+2),primes(100)[2..100]) \\ _Charles R Greathouse IV_, Jun 07 2013 %K A134797 easy,nonn,less %O A134797 1,1 %A A134797 _Omar E. Pol_, Nov 14 2007