OFFSET
1,2
EXAMPLE
Array begins:
1 2 3 4 5 6 7 8 9 10 ...
2 3 5 6 8 9 11 12 14 15 ...
3 5 6 8 11 12 15 17 18 20 ...
4 6 8 9 13 15 19 20 22 24 ...
5 8 11 13 14 17 22 24 27 28 ...
MAPLE
T := (m, n) -> nops({seq(seq(i*j, i=1..m), j=1..n)});
MATHEMATICA
T[m_, n_] := Length[Union @@ Table[i*j, {i, m}, {j, n}]]
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Michael Kleber, Jul 09 2003
STATUS
approved