A079368 - OEIS

%I #12 Jan 14 2021 22:04:38

%S 1,9,19,22,25,26,29,66,6487,6677,6678,55987,64383

%N Where records occur in A079366.

%C RECORDS transform of A079366.

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

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

%t a = {}; l = 0;

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

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

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

%Y Cf. A079366, A079367.

%K nonn,more

%O 1,2

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

%E a(9)-a(13) calculated (using PARI) with a precision of 100000 digits and checked with 150000-digit precision. - Lambert Klasen (lambert.klasen(AT)gmx.net), Jun 06 2006