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,3

Links

Table of n, a(n) for n=1..48.

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 ]]

Crossrefs

Cf. A192119.

Sequence in context: A282572 A299642 A128539 * A282534 A303803 A304850

Adjacent sequences: A192115 A192116 A192117 * A192119 A192120 A192121

Keyword

nonn

Author

Clark Kimberling, Jun 23 2011

Status

approved