A192165 Monotonic ordering of nonnegative differences 4^i-7^j, for 40>= i>=0, j>=0.
0, 3, 9, 15, 57, 63, 207, 249, 255, 681, 975, 1017, 1023, 1695, 3753, 4047, 4089, 4095, 13983, 16041, 16335, 16377, 16383, 48729, 63135, 65193, 65487, 65529, 65535, 144495, 225033, 245337, 259743, 261801, 262095, 262137, 262143, 930927, 1031769, 1046175
Offset: 1
Keywords
Crossrefs
Cf. A192166.
Programs
-
Mathematica
c = 4; 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 ]]