login
A079371
Where records occur in A079369.
2
1, 2, 3, 5, 6, 9, 19, 23, 25, 35, 36, 42, 976, 977
OFFSET
1,2
COMMENTS
RECORDS transform of A079369.
LINKS
MATHEMATICA
A079369 = Cases[Import["https://oeis.org/A079369/b079369.txt", "Table"], {_, _}][[All, 2]];
a = {}; l = 0;
For[i = 1, i <= Length[A079369], i++,
If[A079369[[i]] > l, l = A079369[[i]]; AppendTo[a, i]]];
a (* Robert Price, Mar 14 2020 *)
CROSSREFS
KEYWORD
nonn,more
AUTHOR
N. J. A. Sloane, Feb 16 2003
EXTENSIONS
a(13)-a(14) from Robert Price, Mar 14 2020
STATUS
approved