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 A082096 #17 Sep 08 2022 08:45:09 %S A082096 1,1,3,7,29,151,1069,9887,115891,1666421,28700933,580669933, %T A082096 13578126713,362075579539,10886955278951,365589325548857, %U A082096 13598064388599629,556220494250764093 %N A082096 A 2nd order recursion: a(1)=a(2)=1; a(n) = prime(a(n-2)+a(n-1)) = A000040(a(n-2)+a(n-1)). %t A082096 a[n_]:= a[n]= If[n<3, 1, Prime[a[n-1]+a[n-2]]]; Table[a[n], {n,13}] (* modified by _G. C. Greubel_, Aug 31 2019 *) %t A082096 nxt[{a_,b_}]:={b,Prime[a+b]}; Transpose[NestList[nxt,{1,1},13]][[1]] (* _Harvey P. Dale_, Oct 02 2013 *) %o A082096 (Magma) a:= func< n | n lt 3 select 1 else NthPrime(Self(n-1) + Self(n-2)) >; %o A082096 [a(n): n in [1..12]]; // _G. C. Greubel_, Aug 31 2019 %Y A082096 Cf. A069103, A082094, A082095. %K A082096 nonn,more %O A082096 1,3 %A A082096 _Labos Elemer_, Apr 11 2003 %E A082096 a(15) from _G. C. Greubel_, Aug 31 2019 %E A082096 a(16)-a(18) from _Chai Wah Wu_, Sep 18 2019