A192170 Monotonic ordering of nonnegative differences 9^i-4^j, for 40>= i>=0, j>=0.
0, 5, 8, 17, 65, 77, 80, 473, 665, 713, 725, 728, 2465, 5537, 6305, 6497, 6545, 6557, 6560, 42665, 54953, 58025, 58793, 58985, 59033, 59045, 59048, 269297, 465905, 515057, 527345, 530417, 531185, 531377, 531425, 531437, 531440, 588665, 3734393, 4520825
Offset: 1
Keywords
Crossrefs
Cf. A192169.
Programs
-
Mathematica
c = 9; 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 ]]