login
A277284
Prime-indexed primes p such that Fibonacci(p) is prime.
2
3, 5, 11, 17, 83, 431, 509, 130021, 148091, 433781
OFFSET
1,1
COMMENTS
Intersection of A006450 and A083668. - Michel Marcus, Oct 21 2016
FORMULA
a(n) = prime(A277575(n)).
a(n) = prime(prime(A122534(n)).
EXAMPLE
17 = A000040(7), with 7 itself being a prime, and A000045(17) = 1597, a prime, thus 17 is included in this sequence.
MATHEMATICA
Select[Prime[Prime[Range[37000]]], PrimeQ[Fibonacci[#]]&] (* Harvey P. Dale, Sep 12 2019 *)
PROG
(PARI) isok(p) = isprime(p) && isprime(primepi(p)) && isprime(fibonacci(p)); \\ Michel Marcus, Oct 21 2016
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Bobby Jacobs, Oct 21 2016
STATUS
approved