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

0, 2, 8, 17, 26, 71, 80, 143, 233, 242, 629, 719, 728, 1187, 2087, 2177, 2186, 5561, 6461, 6551, 6560, 9683, 18683, 19583, 19673, 19682, 49049, 58049, 58949, 59039, 59048, 77147, 167147, 176147, 177047, 177137, 177146, 431441, 521441, 530441, 531341, 531431

Offset: 1

Author

Clark Kimberling, Jun 24 2011

Keywords

• nonn

Crossrefs

Cf. A192160.

Programs

Mathematica

c = 3; 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 ]]