|
|
A093311
|
|
a(n) is the k-th upper twin prime, where k = n!.
|
|
1
|
|
|
5, 5, 7, 43, 463, 4639, 51349, 563011, 6445993, 80358601, 1066687471, 15116681443, 228312888439
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
PROG
|
(PARI)
twinu(n) = { local(c, x); c=0; x=1; while(c<n, if(isprime(prime(x)+2), c++); x++; ); return(prime(x)) }
g(n) = for(x=0, n, print1(twinu(x!), ", "))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|