A079382 - OEIS

%I #9 Mar 15 2020 22:20:01

%S 2,7,13,19,89,131,251,4327,4751,38561

%N Records in A079381.

%C RECORDS transform of A079381.

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

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

%t a = {}; l = 0;

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

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

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

%Y Cf. A079381, A079383, A079366, A079367, A079368.

%K nonn,more

%O 1,1

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

%E a(8)-a(10) from _Robert Price_, Mar 15 2020