This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A232498 #20 Dec 12 2013 22:38:17 %S A232498 2,3,19,4567,52267,325219, %T A232498 2967036956187340614662532876709507060271690954641131383 %N A232498 Primes in the tribonacci-like sequence, A020992. %t A232498 a={0,2,1}; Print[2] For[n=3, n<=1000, n++, sum=Plus@@a; If[PrimeQ[sum], Print[sum]]; a=RotateLeft[a]; a[[3]]=sum] %Y A232498 Cf. A001590, A100683, A231574, A231575, A232543, A214899, A020992, A233554. %K A232498 nonn %O A232498 1,1 %A A232498 _Robert Price_, Dec 12 2013