A233190 Indices of primes in the tribonacci-like sequence, A214899.

0, 2, 3, 9, 13, 27, 35, 39, 87, 95, 97, 99, 113, 131, 233, 971, 3851, 5637, 6553, 106099

Offset

1,2

Comments

a(21) > 2*10^5.

Links

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

Mathematica

a={2, 1, 2}; Print[1], Print[2]; For[n=3, n<=1000, n++, sum=Plus@@a; If[PrimeQ[sum], Print[n]]; a=RotateLeft[a]; a[[3]]=sum]

Crossrefs

Cf. A001590, A100683, A231574, A231575, A232542, A214899, A230607.

Sequence in context: A123859 A048744 A101234 * A269154 A358829 A225792

Adjacent sequences: A233187 A233188 A233189 * A233191 A233192 A233193

Keyword

nonn

Author

Robert Price, Dec 05 2013

Status

approved