A192114 Monotonic ordering of nonnegative differences 2^i-5^j, for 40>=i>=0, j>=0.
0, 1, 3, 7, 11, 15, 27, 31, 39, 59, 63, 103, 123, 127, 131, 231, 251, 255, 387, 399, 487, 507, 511, 759, 899, 971, 999, 1019, 1023, 1423, 1923, 2023, 2043, 2047, 3471, 3971, 4071, 4091, 4095, 5067, 7567, 8067, 8167, 8187, 8191, 13259, 15759, 16259, 16359
Offset: 1
Keywords
Crossrefs
Cf. A192115.
Programs
-
Mathematica
c = 2; d = 5; 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 ]]