login
A163851
Primes of the form Fibonacci(k)-2.
6
3, 11, 19, 53, 6763, 354224848179261915073, 6356306993006846248181, 6549923758702735390139183573072808204317151158828986996794832713116199613609647330495585293499629115294769, 131000268055609921839337880403168874871518195097038587116150308718344497444830568622793920406537331453336153249817445002421
OFFSET
1,1
COMMENTS
Contains the numbers A000045(k)-2 for k = 5, 7, 8, 10, 20, 100, 106, 508, 586, ...
which equal A000040(j) for j = 2, 5, 8, 16, 871,...
MATHEMATICA
Clear[lst, a, f, n, p]; a=2; lst={}; Do[f=Fibonacci[n]; If[PrimeQ[p=f-a]&&p>1, AppendTo[lst, p]], {n, 3*6!}]; lst
Select[Fibonacci[Range[4, 1000]]-2, PrimeQ] (* Harvey P. Dale, Jan 12 2019 *)
CROSSREFS
Sequence in context: A309027 A213891 A336790 * A213051 A238362 A116945
KEYWORD
nonn
AUTHOR
EXTENSIONS
Indices into Fibonacci and prime sequences added by R. J. Mathar, Aug 18 2009
STATUS
approved