

A064738


Numbers k such that k! + Fibonacci(k) is prime.


1




OFFSET

1,2


COMMENTS

The three values 62, 71 and 227 were certified prime with Primo.


LINKS

Table of n, a(n) for n=1..8.


MATHEMATICA

Do[m = n; If[PrimeQ[n! + Fibonacci[n]], Print[n]], {n, 0, 10^3} ]
Do[If[PrimeQ[n! + Fibonacci[n]], Print[n]], {n, 1, 1800}] (* Ryan Propper, Nov 05 2005 *)


PROG

(PARI) for(n=1, 300, if(isprime(n!+fibonacci(n)), print(n)))


CROSSREFS

Cf. A005478, A000142.
Sequence in context: A289644 A094478 A273090 * A067825 A239417 A296361
Adjacent sequences: A064735 A064736 A064737 * A064739 A064740 A064741


KEYWORD

nonn


AUTHOR

Jason Earls, Oct 17 2001


EXTENSIONS

More terms from Robert G. Wilson v, Oct 18 2001
1753 from Ryan Propper, Nov 05 2005


STATUS

approved



