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

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

Offset: 1

Author

Jason Earls, Oct 17 2001

Keywords

• nonn
• more

Comments

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

Crossrefs

Cf. A005478, A000142.

Programs

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 *)

PARI

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

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