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 A079388 #12 Mar 15 2020 22:20:30
%S A079388 2,3,7,37,149,853,1361,1597,1861,4391,4919,10487,12037,15991,27581,
%T A079388 334421
%N A079388 Records in A079387.
%C A079388 RECORDS transform of A079387.
%H A079388 N. J. A. Sloane, <a href="/transforms.txt">Transforms</a>
%t A079388 A079387 = Cases[Import["https://oeis.org/A079387/b079387.txt", "Table"], {_, _}][[All, 2]];
%t A079388 a = {}; l = 0;
%t A079388 For[i = 1, i <= Length[A079387], i++,
%t A079388 If[A079387[[i]] > l, l = A079387[[i]]; AppendTo[a, l]]];
%t A079388 a (* _Robert Price_, Mar 15 2020 *)
%o A079388 (PARI) \p20000 P(x)=local(y); y=ceil(1/x);if(isprime(y),y,nextprime(y)); F(x)=local(y,i,t1);y=x; t1=vector(10000);for(i=1,10000,p=P(y);t1[i]=p;y=p*y-1);t1 v=F(sqrt(3)-1); m=0;for(i=1,length(v),if(v[i]>m,print1(v[i],",");m=v[i])) (Herrgesell)
%Y A079388 Cf. A079387, A079389, A079366, A079367, A079368.
%K A079388 nonn
%O A079388 1,1
%A A079388 _N. J. A. Sloane_, Feb 16 2003
%E A079388 More terms from Lambert Herrgesell (zero815(AT)googlemail.com), Dec 06 2005
%E A079388 Corrected by _T. D. Noe_, Nov 15 2006