A227627 Numbers k such that F(5*k)/(5*F(k)) is prime, where F(m) is the m-th Fibonacci number.
2, 3, 5, 7, 13, 25, 29, 37, 47, 67, 457, 2309, 2383, 4133, 5023, 8059
Offset: 1
Programs
-
Mathematica
Select[Range[1000],PrimeQ[Fibonacci[5*#]/Fibonacci[#]/5]&]
-
PARI
is(n)=ispseudoprime(fibonacci(5*n)/fibonacci(n)/5) \\ Charles R Greathouse IV, Nov 25 2014
Comments