login
A285992
Primes in the bisected Lucas sequence A002878.
16
11, 29, 199, 521, 3571, 9349, 3010349, 54018521, 370248451, 6643838879, 119218851371, 5600748293801, 688846502588399, 32361122672259149, 412670427844921037470771, 258899611203303418721656157249445530046830073044201152332257717521
OFFSET
1,1
COMMENTS
Subsequence of A005479.
FORMULA
A002878 INTERSECT A000040.
A000032(k) for odd k in A001606. - Robert Israel, May 01 2017
MAPLE
select(isprime, [seq(combinat:-fibonacci(2*n)+combinat:-fibonacci(2*n+2), n=1..200)]); # Robert Israel, May 01 2017
MATHEMATICA
Select[LucasL[Range[1, 400, 2]], PrimeQ] (* Vincenzo Librandi, May 01 2017 *)
Select[LinearRecurrence[{3, -1}, {1, 4}, 160], PrimeQ] (* Harvey P. Dale, Sep 01 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
R. J. Mathar, Apr 30 2017
STATUS
approved