A242572 Indices of primes in A214828.

3, 7, 8, 16, 19, 36, 44, 151, 292, 448, 467, 896, 1148, 1607, 1711, 1956, 2020, 6635, 14228, 25519, 43140, 74984, 77696, 137975

Offset

1,1

Comments

a(25) > 2*10^5.

Links

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

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, 6, 6}; For[n=3, n<=1000, n++, sum=Plus@@a; If[PrimeQ[sum], Print[n]]; a=RotateLeft[a]; a[[3]]=sum]
Flatten[Position[LinearRecurrence[{1, 1, 1}, {1, 6, 6}, 2100], _?(PrimeQ[#]&)]]-1 (* The program generates the first 17 terms of the sequence. *) (* Harvey P. Dale, Dec 14 2025 *)

Crossrefs

Cf. A001590, A100683, A231574, A231575, A232542, A214899, A230607, A020992, A232498, A214727, A081172, A214752, A141523,A214825, A235862, A214827, A214828.

Sequence in context: A031404 A263519 A105263 * A136136 A057548 A122227

Adjacent sequences: A242569 A242570 A242571 * A242573 A242574 A242575

Keyword

nonn,more

Author

Robert Price, May 17 2014

Status

approved