A163854 Primes of the form Fibonacci(k)-5.
3, 29, 139, 2579, 3987795824799770715342824788687062628452272409956636682999616403, 8269366108663463411004717981412027167937978847386801205243459016220834185059487057691
Offset: 1
Keywords
Programs
-
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
Extensions
Comment from Charles R Greathouse IV, Oct 05 2009
Comments