|
|
A163854
|
|
Primes of the form Fibonacci(k)-5.
|
|
3
|
|
|
3, 29, 139, 2579, 3987795824799770715342824788687062628452272409956636682999616403, 8269366108663463411004717981412027167937978847386801205243459016220834185059487057691
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Corresponding k are 6, 9, 12, 18, 306, 408, 3696, 4122, ...
|
|
LINKS
|
|
|
MATHEMATICA
|
Clear[lst, a, f, n, p]; a=5; lst={}; Do[f=Fibonacci[n]; If[PrimeQ[p=f-a]&&p>1, AppendTo[lst, p]], {n, 3*6!}]; lst
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|