login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A075737 Prime Fibonacci numbers with prime indices. 23
2, 5, 13, 89, 233, 1597, 28657, 514229, 433494437, 2971215073, 99194853094755497, 1066340417491710595814572169, 19134702400093278081449423917, 475420437734698220747368027166749382927701417016557193662268716376935476241 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
COMMENTS
Same as A005478 except that F(4) = 3 has been omitted.
Sequence of primes in A001519. [James R. Buddenhagen, May 20 2010]
LINKS
EXAMPLE
5 is a prime and fibonacci(5)=5 is also a prime, 7 is a prime and fibonacci(7)=13 is also a prime, but 2 is a prime and fibonacci(2)=1 is not a prime.
MAPLE
with(combinat, fibonacci): fib_supM_pra := proc(n); if (isprime(n)='true') then if (isprime(fibonacci(n))='true') then RETURN(fibonacci(n)); fi; fi; end: seq(fib_supM_pra(i), i=1..500);
MATHEMATICA
Fibonacci[ Prime[ Select[ Range[50], PrimeQ[ Fibonacci[ Prime[ # ]]] & ]]]
Module[{nn=500, fibs}, fibs=Fibonacci[Range[nn]]; Select[Pick[fibs, Table[ If[ PrimeQ[n], 1, 0], {n, nn}], 1], PrimeQ]] (* Harvey P. Dale, Sep 13 2018 *)
PROG
(PARI) forprime(p=2, 1e3, if(isprime(t=fibonacci(p)), print1(t", "))) \\ Charles R Greathouse IV, Feb 03 2014
CROSSREFS
Subsequence of A030426.
Sequence in context: A075736 A030426 A075742 * A100843 A082101 A158712
KEYWORD
nonn
AUTHOR
Jani Melik, Oct 07 2002
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 14:13 EDT 2024. Contains 371254 sequences. (Running on oeis4.)