A105761 Prime Fibonacci 7-step numbers, A066178.
2, 127, 31489
Offset: 1
Links
- Tony D. Noe and Jonathan Vos Post, Primes in Fibonacci n-step and Lucas n-step Sequences, J. of Integer Sequences, Vol. 8 (2005), Article 05.4.4
- Eric Weisstein's World of Mathematics, Fibonacci n-Step Number
Programs
-
Mathematica
a={1, 0, 0, 0, 0, 0, 0}; lst={}; Do[s=Plus@@a; a=RotateLeft[a]; a[[ -1]]=s; If[PrimeQ[s], AppendTo[lst, s]], {n, 100}]; lst
Comments