0,1

(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!))); } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Jun 20 2009]

Sequence in context: A123633 A157241 A110426 this_sequence A132809 A005882 A085572

Adjacent sequences: A093307 A093308 A093309 this_sequence A093311 A093312 A093313

nonn

Cino Hilliard (hillcino368(AT)gmail.com), Apr 25 2004

Added new term a(8) = 6445991. Harry J. Smith (hjsmithh(AT)sbcglobal.net), Jun 20 2009