A134797 Odd isolated primes.

23, 37, 47, 53, 67, 79, 83, 89, 97, 113, 127, 131, 157, 163, 167, 173, 211, 223, 233, 251, 257, 263, 277, 293, 307, 317, 331, 337, 353, 359, 367, 373, 379, 383, 389, 397, 401, 409, 439, 443, 449, 457, 467, 479, 487, 491, 499, 503, 509, 541, 547, 557, 563, 577

Offset

1,1

Links

Table of n, a(n) for n=1..54.

Omar E. Pol, Determinacion geometrica de los numeros primos y perfectos.

Formula

a(n) = A007510(n+1).

a(n) ~ n log n. - Charles R Greathouse IV, Jun 07 2013

Mathematica

Flatten[Select[Split[Prime[Range[106]], #2 - #1 < 4 &], Length[#] == 1 &]] (* Jayanta Basu, Jun 07 2013 *)

Prog

(PARI) select(p->!isprime(p-2)&&!isprime(p+2), primes(100)[2..100]) \\ Charles R Greathouse IV, Jun 07 2013

Crossrefs

Sequence in context: A290767 A173829 A110673 * A209617 A179780 A153740

Adjacent sequences: A134794 A134795 A134796 * A134798 A134799 A134800

Keyword

easy,nonn,less

Author

Omar E. Pol, Nov 14 2007

Status

approved