|
|
A305414
|
|
Numbers k such that F(k)*F(k+1) + F(k+2) is a prime, where F = A000045 (Fibonacci numbers).
|
|
0
|
|
|
1, 2, 3, 4, 5, 7, 8, 10, 11, 15, 16, 18, 29, 40, 55, 134, 159, 261, 276, 519, 1792, 2045, 2111, 2830, 2878, 3575, 6301, 7394, 9432, 13558, 19714, 21396, 25731, 26790, 28792, 32070, 33951, 46997, 63134, 66272, 67619, 70448, 75525, 77994, 90437
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[1000], PrimeQ[(Fibonacci[#] Fibonacci[# + 1] + Fibonacci[# + 2])]&]
|
|
PROG
|
(Magma) [n: n in [1..1500] | IsPrime(Fibonacci(n) * Fibonacci(n+1) + Fibonacci(n+2))];
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|