A253318 Indices of primes in the 7th-order Fibonacci number sequence, A060455.

7, 8, 11, 12, 14, 15, 16, 17, 18, 19, 21, 23, 26, 32, 33, 36, 42, 44, 71, 72, 137, 180, 193, 285, 679, 955, 1018, 1155, 1176, 1191, 2149, 2590, 2757, 3364, 4233, 6243, 6364, 7443, 10194, 11254, 13318, 18995, 20478, 22647, 29711, 34769, 61815, 71993, 107494, 135942, 148831

Offset

1,1

Comments

a(52) > 2*10^5.

Links

Table of n, a(n) for n=1..51.

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}; step=7; lst={}; For[n=step, n<=1000, n++, sum=Plus@@a; If[PrimeQ[sum], AppendTo[lst, n]]; a=RotateLeft[a]; a[[7]]=sum]; lst

Crossrefs

Cf. A001590, A001631, A100683, A231574, A231575, A232542, A214899, A230607, A020992, A232498, A214727, A081172, A214752, A141523, A214825, A235862, A000288, A000322, A000383, A249413, A060455.

Sequence in context: A071117 A054221 A195240 * A277026 A309592 A090385

Adjacent sequences: A253315 A253316 A253317 * A253319 A253320 A253321

Keyword

nonn

Author

Robert Price, Dec 30 2014

Status

approved