OFFSET
1,4
EXAMPLE
The first 4 columns and first 6 rows (excluding t(6,4)) of the table are:
1, 1, 2, 2
1, 3, 4, 3
2, 4, 3, 6
3, 3, 7, 3
2, 3, 3, 3
5, 7, 6,
The number of these terms which both divide 6 and are coprime to 4 is 12 (the 1's and the 3's). So t(6,4) = 12.
MATHEMATICA
t[1, 1] = 1; t[m_, n_] := t[m, n] = Block[{c = 0}, Do[ Do[ If[k == m && j == n, Continue[]]; If[Mod[m, t[k, j]] == 0 && GCD[t[k, j], n] == 1, c++ ]; , {j, n}]; , {k, m}]; c]; Flatten[Table[t[d + 1 - i, i], {d, 14}, {i, d}]] (* Ray Chandler, Nov 11 2006 *)
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Leroy Quet, Nov 04 2006
EXTENSIONS
Extended by Ray Chandler, Nov 11 2006
STATUS
approved