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

0, 3, 5, 6, 17, 33, 41, 45, 47, 48, 87, 215, 279, 311, 327, 335, 339, 341, 342, 353, 423, 1377, 1889, 2145, 2273, 2337, 2369, 2385, 2393, 2397, 2399, 2400, 8615, 12711, 14759, 15783, 16295, 16551, 16679, 16743, 16775, 16791, 16799, 16803, 16805, 16806, 52113

Offset: 1

Author

Clark Kimberling, Jun 23 2011

Keywords

• nonn

Crossrefs

Cf. A192118.

Programs

Mathematica

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