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

1, 2, 62, 71, 227, 778, 809, 1753, 15329

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..9.

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: A094478 A273090 A106133 * A067825 A239417 A296361

Adjacent sequences: A064735 A064736 A064737 * A064739 A064740 A064741

Keyword

nonn,more

Author

Jason Earls, Oct 17 2001

Extensions

More terms from Robert G. Wilson v, Oct 18 2001

a(8) from Ryan Propper, Nov 05 2005

a(9) from Michael S. Branicky, Sep 21 2024

Status

approved