|
%I #6 Oct 21 2019 14:29:00
%S 0,1,2,3,7,10,15,26,28,31,40,58,63,92,122,127,220,250,255,296,416,476,
%T 506,511,752,808,988,1018,1023,1832,2012,2042,2047,2800,3880,4060,
%U 4090,4095,6896,7976,8156,8186,8191,8608,15088,16168,16348,16378,16383,18880
%N Monotonic ordering of nonnegative differences 2^i-6^j, for 40>=i>=0, j>=0.
%t c = 2; d = 6; t[i_, j_] := c^i - d^j;
%t u = Table[t[i, j], {i, 0, 40}, {j, 0, i*Log[d, c]}];
%t v = Union[Flatten[u ]]
%Y Cf. A192117.
%K nonn
%O 1,3
%A _Clark Kimberling_, Jun 23 2011
|
