[go: up one dir, main page]

login
A192153
Monotonic ordering of nonnegative differences 3^i-7^j, for 40>= i>=0, j>=0.
3
0, 2, 8, 20, 26, 32, 74, 80, 194, 236, 242, 386, 680, 722, 728, 1844, 2138, 2180, 2186, 2876, 4160, 6218, 6512, 6554, 6560, 17282, 19340, 19634, 19676, 19682, 42242, 56648, 58706, 59000, 59042, 59048, 59498, 160340, 174746, 176804, 177098, 177140, 177146
OFFSET
1,2
MATHEMATICA
c = 3; d = 7; 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. A192154.
Sequence in context: A043002 A108180 A233571 * A190640 A230434 A018226
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jun 24 2011
STATUS
approved