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

0, 1, 3, 6, 7, 15, 22, 24, 28, 31, 54, 63, 118, 127, 156, 246, 255, 412, 502, 511, 924, 1014, 1023, 1048, 1948, 2038, 2047, 3096, 3996, 4086, 4095, 6384, 7192, 8092, 8182, 8191, 15384, 16284, 16374, 16383, 22768, 31072, 31768, 32668, 32758, 32767, 48576

Offset: 1

Author

Clark Kimberling, Jun 23 2011

Keywords

• nonn

Crossrefs

Cf. A192125.

Programs

Mathematica

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