A234703 Primes in the tribonacci-like sequence, A214727.

2, 2, 5, 101, 13241, 151537, 66848890001808737, 8602289657912317933269334679427588251509673524841616601

Offset: 1

Author

Robert Price, Dec 29 2013

Keywords

• nonn

Comments

The next term (a(9)) has 97 digits. - Harvey P. Dale, Feb 22 2023

Crossrefs

Cf. A001590, A100683, A231574, A231575, A232543, A214899, A020992, A233554. A214727, A234696.

Programs

Mathematica

a={1,2,2}; Print[2]; Print[2]; For[n=3, n<=1000, n++, sum=Plus@@a; If[PrimeQ[sum], Print[sum]]; a=RotateLeft[a]; a[[3]]=sum]
Select[LinearRecurrence[{1,1,1},{1,2,2},500],PrimeQ] (* Harvey P. Dale, Feb 22 2023 *)