OFFSET
0,1
FORMULA
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
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