A192201 Monotonic ordering of nonnegative differences 5^i-10^j, for 40>= i>=0, j>=0.

0, 4, 15, 24, 25, 115, 124, 525, 615, 624, 2125, 3025, 3115, 3124, 5625, 14625, 15525, 15615, 15624, 68125, 77125, 78025, 78115, 78124, 290625, 380625, 389625, 390525, 390615, 390624, 953125, 1853125, 1943125, 1952125, 1953025, 1953115, 1953124, 8765625

Offset: 1

Author

Clark Kimberling, Jun 25 2011

Keywords

• nonn

Crossrefs

Cf. A192202.

Programs

Mathematica

c = 5; d = 10; t[i_, j_] := c^i - d^j;
u = Table[t[i, j], {i, 0, 40}, {j, 0, i*Log[d, c]}];
v = Union[Flatten[u ]]