A192172 Monotonic ordering of nonnegative differences 10^i-4^j, for 40>=i>=0, j>=0.
0, 6, 9, 36, 84, 96, 99, 744, 936, 984, 996, 999, 5904, 8976, 9744, 9936, 9984, 9996, 9999, 34464, 83616, 95904, 98976, 99744, 99936, 99984, 99996, 99999, 737856, 934464, 983616, 995904, 998976, 999744, 999936, 999984, 999996, 999999, 5805696, 8951424
Offset: 1
Keywords
Crossrefs
Cf. A192171.
Programs
-
Mathematica
c = 10; d = 4; 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 ]]