OFFSET
1,2
EXAMPLE
The differences accrue like this:
1-1
4-1
16-5......16-1
64-25.....64-5.....64-1
256-125...256-25...256-5...256-1
MATHEMATICA
c = 4; 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 ]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jun 24 2011
STATUS
approved