login
A254412
Indices of primes in the 8th-order Fibonacci number sequence, A123526.
2
11, 13, 15, 24, 30, 33, 57, 104, 121, 132, 149, 158, 178, 220, 295, 389, 1070, 1101, 1373, 1761, 1778, 2333, 2731, 4541, 5189, 5237, 5738, 8025, 8787, 10561, 11783, 13435, 14638, 15337, 20985, 21722, 24770, 31009, 57367, 65877, 129773, 134630, 167020
OFFSET
1,1
COMMENTS
a(44) > 2*10^5.
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
MATHEMATICA
a={1, 1, 1, 1, 1, 1, 1, 1}; step=8; lst={}; For[n=step+1, n<=1000, n++, sum=Plus@@a; If[PrimeQ[sum], AppendTo[lst, n]]; a=RotateLeft[a]; a[[step]]=sum]; lst
KEYWORD
nonn,more
AUTHOR
Robert Price, Jan 30 2015
STATUS
approved