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

0, 1, 3, 7, 8, 15, 24, 31, 56, 63, 64, 120, 127, 192, 248, 255, 448, 504, 511, 512, 960, 1016, 1023, 1536, 1984, 2040, 2047, 3584, 4032, 4088, 4095, 4096, 7680, 8128, 8184, 8191, 12288, 15872, 16320, 16376, 16383, 28672, 32256, 32704, 32760, 32767, 32768

Offset

1,3

Links

Nathaniel Johnston, Table of n, a(n) for n = 1..288 [truncated to 2^40-1 by Georg Fischer, Nov 16 2021]

Maple

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

Mathematica

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

Crossrefs

Cf. A192110, A192121.

Sequence in context: A076683 A045542 A249435 * A031404 A263519 A105263

Adjacent sequences: A192117 A192118 A192119 * A192121 A192122 A192123

Keyword

nonn,easy,fini

Author

Clark Kimberling, Jun 23 2011

Status

approved