A192121 Monotonic ordering of nonnegative differences 8^i - 2^j, for 40 >= i >= 0, j >= 0.

0, 4, 6, 7, 32, 48, 56, 60, 62, 63, 256, 384, 448, 480, 496, 504, 508, 510, 511, 2048, 3072, 3584, 3840, 3968, 4032, 4064, 4080, 4088, 4092, 4094, 4095, 16384, 24576, 28672, 30720, 31744, 32256, 32512, 32640, 32704, 32736, 32752, 32760, 32764, 32766, 32767

Offset: 1

Author

Clark Kimberling, Jun 23 2011

Keywords

• nonn
• easy
• fini

Links

• Nathaniel Johnston, Table of n, a(n) for n = 1..2461 [truncated to 8^40-1 by _Georg Fischer_, Nov 16 2021]

Crossrefs

Cf. A192110, A192120.

Programs

Maple

A192121:={}: for i from 0 to 5 do for j from 0 to 3*i do A192121 := A192121 union {8^i-2^j}: od: od: op(A192121); # Nathaniel Johnston, Jun 23 2011

Mathematica

c = 8; d = 2; 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 ]]