A232543 Indices of primes in 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.

Formula

A100683(a(n)) = A232542(n). - Arthur O'Dwyer, 25 Jul 2024

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

Extensions

Name clarified by Arthur O'Dwyer, Jul 25 2024

Status

approved