login
A242316
Prime terms in the tribonacci-like sequence A214826.
0
17, 103, 1764391, 8907752079422393063, 28959877095025359725108610631647478770525190687597954707985655095645523042346644747326776183477265033
OFFSET
1,1
COMMENTS
a(6) is too large to appear here, having 124 digits. It corresponds to A214826(467).
MATHEMATICA
a={1, 4, 4}; 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, 4, 4}, 400], PrimeQ] (* Harvey P. Dale, Mar 17 2016 *)
KEYWORD
nonn
AUTHOR
Robert Price, May 10 2014
STATUS
approved