OFFSET
1,1
FORMULA
EXAMPLE
For n=6, the 6th Fibonacci number is 8 and the 8th lower twin prime is 71, the 6th entry.
PROG
(PARI) f(n) = for(x=1, n, print1(twinl(fibonacci(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, 20000000); 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=1, 25, write("b093306.txt", n, " ", twinl(fibonacci(n)))); } \\ Harry J. Smith, Jun 20 2009
CROSSREFS
KEYWORD
nonn
AUTHOR
Cino Hilliard, Apr 25 2004
EXTENSIONS
a(24)-a(25) from Harry J. Smith, Jun 20 2009
a(26)-a(34) from Giovanni Resta, Jun 10 2018
STATUS
approved