login
A192120
Monotonic ordering of nonnegative differences 2^i - 8^j, for 40 >=i >= 0, j >= 0.
4
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
Sequence in context: A076683 A045542 A249435 * A031404 A263519 A105263
KEYWORD
nonn,easy,fini
AUTHOR
Clark Kimberling, Jun 23 2011
STATUS
approved