[go: up one dir, main page]

login
A192159
Monotonic ordering of nonnegative differences 3^i-10^j, for 40>= i>=0, j>=0.
3
0, 2, 8, 17, 26, 71, 80, 143, 233, 242, 629, 719, 728, 1187, 2087, 2177, 2186, 5561, 6461, 6551, 6560, 9683, 18683, 19583, 19673, 19682, 49049, 58049, 58949, 59039, 59048, 77147, 167147, 176147, 177047, 177137, 177146, 431441, 521441, 530441, 531341, 531431
OFFSET
1,2
MATHEMATICA
c = 3; d = 10; 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. A192160.
Sequence in context: A284395 A217192 A224865 * A066564 A357576 A034972
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jun 24 2011
STATUS
approved