login
A093310
a(n) is the k-th lower twin prime, where k = n!.
1
3, 3, 5, 41, 461, 4637, 51347, 563009, 6445991, 80358599, 1066687469, 15116681441, 228312888437
OFFSET
0,1
FORMULA
From Amiram Eldar, Jul 07 2024: (Start)
a(n) = A001359(n!).
a(n) = A093311(n) - 2. (End)
PROG
(PARI)
twinl(n) = { local(c, x); c=0; x=1; while(c<n, if(isprime(prime(x)+2), c++); x++; ); return(prime(x-1)) }
f(n) = for(x=0, n, print1(twinl(x!), ", "))
(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
KEYWORD
nonn,more
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