A192160 Monotonic ordering of nonnegative differences 10^i-3^j, for 40>=i>=0, j>=0.

0, 1, 7, 9, 19, 73, 91, 97, 99, 271, 757, 919, 973, 991, 997, 999, 3439, 7813, 9271, 9757, 9919, 9973, 9991, 9997, 9999, 40951, 80317, 93439, 97813, 99271, 99757, 99919, 99973, 99991, 99997, 99999, 468559, 822853, 940951, 980317, 993439, 997813, 999271

Offset

1,3

Links

Table of n, a(n) for n=1..43.

Mathematica

c = 10; d = 3; 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. A192159.

Sequence in context: A046257 A074343 A103853 * A139202 A243996 A125968

Adjacent sequences: A192157 A192158 A192159 * A192161 A192162 A192163

Keyword

nonn

Author

Clark Kimberling, Jun 24 2011

Status

approved