A192167 Monotonic ordering of nonnegative differences 4^i-8^j, for 40>= i>=0, j>=0.
0, 3, 8, 15, 56, 63, 192, 248, 255, 512, 960, 1016, 1023, 3584, 4032, 4088, 4095, 12288, 15872, 16320, 16376, 16383, 32768, 61440, 65024, 65472, 65528, 65535, 229376, 258048, 261632, 262080, 262136, 262143, 786432, 1015808, 1044480, 1048064, 1048512, 1048568
Offset: 1
Keywords
Crossrefs
Cf. A192168.
Programs
-
Mathematica
c = 4; d = 8; 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 ]]