|
%I #8 Mar 15 2020 02:45:51
%S 11,17,23,97,107,127,409,58889
%N Records in A079366.
%C RECORDS transform of A079366.
%H N. J. A. Sloane, <a href="/transforms.txt">Transforms</a>
%t A079366 = Cases[Import["https://oeis.org/A079366/b079366.txt", "Table"], {_, _}][[All, 2]];
%t a = {}; l = 0;
%t For[i = 1, i <= Length[A079366], i++,
%t If[A079366[[i]] > l, l = A079366[[i]]; AppendTo[a, l]]];
%t a (* _Robert Price_, Mar 14 2020 *)
%Y Cf. A079366, A079368.
%K nonn,more
%O 1,1
%A _N. J. A. Sloane_, Feb 15 2003
|
