

A079305


First near twin primes of order 6n: smallest p such that p, p+2, p+6n and p+6n+2 are primes.


0



5, 5, 11, 5, 11, 5, 17, 11, 5, 11, 5, 29, 29, 17, 11, 5, 5, 29, 197, 17, 11, 5, 11, 5, 29, 41, 17, 11, 5, 11, 5, 5, 29, 107, 17, 11, 5, 11, 5, 29, 101, 17, 11, 5, 11, 5, 29, 59, 17, 11, 5, 107, 29, 107, 17, 11, 5, 71, 107, 59, 461, 59, 41, 137, 29, 431, 17, 11, 5, 11, 5, 29, 179
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS

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


MATHEMATICA

a[n_] := For[p=5, True, p+=6, If[PrimeQ[p]&&PrimeQ[p+2]&&PrimeQ[p+6n]&&PrimeQ[p+6n+2], Return[p]]]


PROG

(PARI) neartp(n) = { forstep(d=6, n, 6, forprime(x=3, n, if(isprime(x+2) & isprime(x+d) & isprime(x+d+2), print1(x", "); break ) ) ) }


CROSSREFS

Sequence in context: A087705 A087033 A175902 * A247871 A204902 A151728
Adjacent sequences: A079302 A079303 A079304 * A079306 A079307 A079308


KEYWORD

easy,nonn


AUTHOR

Cino Hilliard, Feb 09 2003


EXTENSIONS

Edited by Dean Hickerson, Feb 11 2003


STATUS

approved



