OFFSET
1,3
COMMENTS
Next term > 10^5. - Joerg Arndt, Jul 25 2016
MATHEMATICA
Select[Range[0, 7000], PrimeQ[LucasL[#] + 2^#] &]
PROG
(Magma) [n: n in [1..7000] | IsPrime(Lucas(n)+2^n)];
(PARI) isok(n) = isprime(fibonacci(n-1)+fibonacci(n+1)+2^n); \\ Altug Alkan, Jul 25 2016
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Vincenzo Librandi, Jul 25 2016
STATUS
approved