login
A192194
Monotonic ordering of nonnegative differences 6^i-5^j, for 40>= i>=0, j>=0.
3
0, 1, 5, 11, 31, 35, 91, 191, 211, 215, 671, 1171, 1271, 1291, 1295, 4651, 7151, 7651, 7751, 7771, 7775, 31031, 43531, 46031, 46531, 46631, 46651, 46655, 201811, 264311, 276811, 279311, 279811, 279911, 279931, 279935, 312071, 1288991, 1601491, 1663991
OFFSET
1,3
MATHEMATICA
c = 6; d = 5; 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 ]]
Take[Union[Select[6^#[[1]]-5^#[[2]]&/@Tuples[Range[0, 60], 2], #>=0&]], 40] Harvey P. Dale, May 20 2012
CROSSREFS
Cf. A192193.
Sequence in context: A335455 A114688 A257717 * A239842 A092963 A191069
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jun 25 2011
STATUS
approved