A079389 Where records occur in A079387.

1, 2, 4, 8, 11, 78, 623, 661, 729, 812, 993, 1088, 1318, 4250, 7041, 7499

Offset: 1

Author

N. J. A. Sloane, Feb 16 2003

Keywords

• nonn

Comments

RECORDS transform of A079387.

Links

• N. J. A. Sloane, Transforms

Crossrefs

Cf. A079387, A079388, A079366, A079367, A079368.

Programs

Mathematica

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

Extensions

More terms from Lambert Herrgesell (zero815(AT)googlemail.com), Dec 06 2005