A389569 - OEIS

%I #11 Nov 10 2025 22:52:35

%S 0,1,3,6,10,11,13,102,103,106,110,116,124,156,187,206,225,246,261,999,

%T 1003,1004,1018,1023,1027,1108,5832,9999,10001,10021,10110,10136,

%U 11103,93330,99998,99999,100082,100259,101713,102407,115946,121525,192977,228071,999997,999998,999999,1071435,1091270

%N Indices of records in A034058.

%C Numbers k such that A034058(j) < A034058(k) for all j < k.

%H Robert Israel, <a href="/A389569/b389569.txt">Table of n, a(n) for n = 1..63</a>

%F A034058(a(n)) = A389568(n).

%e a(4) = 6 because A034058(6) = 18 and A034058(j) < 18 for 0 <= j <= 5.

%p f:= proc(n) local td, x, y, L;

%p     td:= 10^(ilog10(n)+1);

%p     for x from 1 do

%p       y:= (x+n/td)^3;

%p       L:= ceil(y);

%p       if y < L and L < (x + (n+1)/td)^3 then return(L) fi

%p     od:

%p end proc:

%p V:= 0: m:= 9: count:= 1:

%p for i from 1 while count < 50 do

%p   v:= f(i);

%p   if v > m then V:= V, i; m:= v; count:= count+1; fi

%p od:

%p V;

%Y Cf. A034058, A389568.

%K nonn,base

%O 1,3

%A _Robert Israel_, Nov 05 2025