A103740 Numbers k such that k! * F(k) + 1 is prime.
1, 2, 3, 4, 5, 7, 8, 10, 11, 15, 41, 98, 149, 193, 233, 265, 403, 898, 935, 1291, 2079
Offset: 1
Examples
a(6)=7 because 7!*fibonacci(7)+1 = 65521, a prime.
Crossrefs
Cf. A005443.
Programs
-
Mathematica
Select[Range[410],PrimeQ[#!Fibonacci[#]+1]&] (* The program generates the first 17 terms of the sequence. *) (* Harvey P. Dale, Jan 30 2024 *)
Comments