A242325 Prime terms in the tribonacci-like sequence A214827.
5, 5, 11, 37, 127, 233, 1451, 4909, 9029, 16607, 103333, 37314473023, 232180447061, 2657194941637, 13356042204482014297297131147848321, 4717604056747741831285902446873182186115052544834224581062711115537322612895948580479
Offset: 1
Keywords
Crossrefs
Programs
-
Mathematica
a={1,5,5}; Print[5]; Print[5]; For[n=3, n<=1000, n++, sum=Plus@@a; If[PrimeQ[sum], Print[sum]]; a=RotateLeft[a]; a[[3]]=sum]
Comments