A093310 k-th lower twin prime, where k = n!.

3, 3, 5, 41, 461, 4637, 51347, 563009, 6445991, 80358599, 1066687469, 15116681441, 228312888437

Offset

0,1

Links

Table of n, a(n) for n=0..12.

Prog

(PARI) f(n) = for(x=0, n, print1(twinl(x!), ", ")) twinl(n) = { local(c, x); c=0; x=1; while(c<n, if(isprime(prime(x)+2), c++); x++; ); return(prime(x-1)) }
(PARI) default(primelimit, 7000000); twinl(n) = { local(c, x); c=0; x=1; while(c<n, if(isprime(prime(x)+2), c++); x++); return(prime(x-1)) } { for(n=0, 8, write("b093310.txt", n, " ", twinl(n!))); } \\ Harry J. Smith, Jun 20 2009

Crossrefs

Sequence in context: A201496 A110426 A200562 * A256402 A170919 A364661

Adjacent sequences: A093307 A093308 A093309 * A093311 A093312 A093313

Keyword

nonn

Author

Cino Hilliard, Apr 25 2004

Extensions

a(8) from Harry J. Smith, Jun 20 2009

a(9)-a(12) from Giovanni Resta, Jun 10 2018

Status

approved