OFFSET
1,3
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..122 (calculated using the b-file at A054782)
EXAMPLE
a(10) = 8 because the 10th Fibonacci number is 55, the 11th is 89 and the eight primes between them are 59, 61, 67, 71, 73, 79, 83 and 89.
MATHEMATICA
lst={}; Do[p=0; Do[If[PrimeQ[a], p++ ], {a, Fibonacci[n], Fibonacci[n+1]}]; AppendTo[lst, p], {n, 50}]; lst (* Vladimir Joseph Stephan Orlovsky, Nov 23 2009 *)
PROG
(PARI) { a(n)= c=0; forprime(N=fibonacci(n), fibonacci(n+1), c=c+1); return(c); }
(Magma) [#PrimesInInterval(Fibonacci(n-1), Fibonacci(n)): n in [2..45]]; // Vincenzo Librandi, Jul 13 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Hauke Worpel (hw1(AT)email.com), May 23 2003
EXTENSIONS
Corrected and extended by Rick L. Shepherd, May 26 2003
a(43)-a(44) from Vincenzo Librandi, Jul 13 2017
STATUS
approved