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

0, 1, 3, 7, 9, 15, 25, 31, 57, 63, 79, 121, 127, 169, 207, 249, 255, 463, 505, 511, 681, 975, 1017, 1023, 1695, 1705, 1999, 2041, 2047, 3753, 4047, 4089, 4095, 5791, 7849, 8143, 8185, 8191, 13423, 13983, 15961, 16041, 16335, 16377, 16383, 30367, 32425, 32719

Offset: 1

Author

Clark Kimberling, Jun 23 2011

Keywords

• nonn

Crossrefs

Cf. A192119.

Programs

Mathematica

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