|
|
A163852
|
|
Primes of the form Fibonacci(k)-3.
|
|
5
|
|
|
2, 5, 31, 607, 628580612875886694881648328579603114508131388106874704297602636435532791990880832689119, 7531436383873795315009506236096188648036856522778750817396763797198414070984881727501992372613765176393353441439
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Contains the numbers A000045(k)-3 for k = 5, 6, 9, 15, 417, 537, 2085,...
which equal A000040(j) for j = 1, 3, 11, 111,...
|
|
LINKS
|
|
|
MATHEMATICA
|
Clear[lst, a, f, n, p]; a=3; lst={}; Do[f=Fibonacci[n]; If[PrimeQ[p=f-a]&&p>1, AppendTo[lst, p]], {n, 3*6!}]; lst
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Indices into Fibonacci and prime sequences added by R. J. Mathar, Aug 18 2009
|
|
STATUS
|
approved
|
|
|
|