A122534 Numbers k such that Fibonacci(prime(prime(k))) is prime.
1, 2, 3, 4, 9, 23, 25, 1456, 1616, 3865
Offset: 1
This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
17 = A000040(7), with 7 itself being a prime, and A000045(17) = 1597, a prime, thus 17 is included in this sequence.
Select[Prime[Prime[Range[37000]]],PrimeQ[Fibonacci[#]]&] (* Harvey P. Dale, Sep 12 2019 *)
isok(p) = isprime(p) && isprime(primepi(p)) && isprime(fibonacci(p)); \\ Michel Marcus, Oct 21 2016
Comments