A232543 Indices of prime tribonacci numbers (A100683).

1, 2, 3, 4, 7, 11, 12, 27, 32, 119, 127, 136, 611, 755, 872, 1676, 5363, 15623, 27564, 42679, 54576, 74123, 91043, 104331

Offset

1,2

Comments

a(25) > 2*10^5.

Links

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

Mathematica

a={-1, 2, 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.

Sequence in context: A226387 A102282 A353178 * A279071 A171027 A348792

Adjacent sequences: A232540 A232541 A232542 * A232544 A232545 A232546

Keyword

nonn

Author

Robert Price, Nov 25 2013

Status

approved