login
Records in A079372.
2

%I #11 Mar 15 2020 02:47:40

%S 3,5,17,29,31,37,53,97,211,1489,1531,1741,4217,12373,12953,14939,

%T 34667,180797

%N Records in A079372.

%C RECORDS transform of A079372.

%H N. J. A. Sloane, <a href="/transforms.txt">Transforms</a>

%t A079372 = Cases[Import["https://oeis.org/A079372/b079372.txt", "Table"], {_, _}][[All, 2]];

%t a = {}; l = 0;

%t For[i = 1, i <= Length[A079372], i++,

%t If[A079372[[i]] > l, l = A079372[[i]]; AppendTo[a, l]]];

%t a (* _Robert Price_, Mar 14 2020 *)

%Y Cf. A079372, A079374, A079366-A079368.

%K nonn,more

%O 1,1

%A _N. J. A. Sloane_, Feb 16 2003

%E a(10) - a(18) from _Nathaniel Johnston_, Apr 25 2011