OFFSET
1,1
LINKS
Jorge Coveiro, Table of n, a(n) for n = 1..62 (first 55 terms from Vincenzo Librandi)
MATHEMATICA
Select[Range[2000], PrimeQ[2 Fibonacci[#] - 1]&]
PROG
(Magma) [n: n in [1..1700] | IsPrime(2*Fibonacci(n)-1)];
(PARI) is(n)=ispseudoprime(2*fibonacci(n)-1) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Aug 13 2013
STATUS
approved