A255530 Indices of primes in the 9th-order Fibonacci number sequence, A251746.
10, 19, 59, 79, 12487
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
Crossrefs
Programs
-
Mathematica
a={0,0,0,0,0,0,0,1,0}; step=9; lst={}; For[n=step,n<=1000,n++, sum=Plus@@a; If[PrimeQ[sum], AppendTo[lst,n]]; a=RotateLeft[a]; a[[step]]=sum]; lst
Comments