|
|
A134850
|
|
Number of primes between A075737(n) and A075737(n+1), including one bound.
|
|
1
|
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
a = {}; k = {}; Do[If[PrimeQ[Fibonacci[Prime[n]]], AppendTo[k, Fibonacci[Prime[n]]]], {n, 1, 100}]; Do[AppendTo[a, PrimePi[k[[n + 1]]] - PrimePi[k[[n]]]], {n, 1, 9}]; a
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
a(10) using Kim Walisch's primecount, from Amiram Eldar, May 14 2023
|
|
STATUS
|
approved
|
|
|
|