|
|
A103740
|
|
Numbers n such that n! * F(n) + 1 is prime.
|
|
0
|
|
|
1, 2, 3, 4, 5, 7, 8, 10, 11, 15, 41, 98, 149, 193, 233, 265, 403, 898, 935, 1291, 2079
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
All values through 2079 have been proved prime with WinPFGW. No more terms up to 6700. Primality testing 2079!*F(2079)+1 [N-1, Brillhart-Lehmer-Selfridge] Running N-1 test using base 2087 Running N-1 test using base 2099 Calling Brillhart-Lehmer-Selfridge with factored part 33.88% 2079!*F(2079)+1 is prime! (15.2535s+0.0043s)
|
|
LINKS
|
|
|
EXAMPLE
|
a(6)=7 because 7!*fibonacci(7)+1 = 65521, a prime.
|
|
MATHEMATICA
|
Select[Range[410], PrimeQ[#!Fibonacci[#]+1]&] (* The program generates the first 17 terms of the sequence. *) (* Harvey P. Dale, Jan 30 2024 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,less
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|