A079367 Records in A079366.

11, 17, 23, 97, 107, 127, 409, 58889

Offset: 1

Author

N. J. A. Sloane, Feb 15 2003

Keywords

• nonn
• more

Comments

RECORDS transform of A079366.

Links

• N. J. A. Sloane, Transforms

Crossrefs

Cf. A079366, A079368.

Programs

Mathematica

A079366 = Cases[Import["https://oeis.org/A079366/b079366.txt", "Table"], {, }][[All, 2]];
a = {}; l = 0;
For[i = 1, i <= Length[A079366], i++,
  If[A079366[[i]] > l, l = A079366[[i]]; AppendTo[a, l]]];
a (* Robert Price, Mar 14 2020 *)