求助-构建分段矩阵 - mathematica吧

level 1

f[i_, j_] = If[i <= j, j/Sin[i + j], j/Cos[i + j]];
Table[f[i, j], {i, 10}, {j, 10}] // MatrixForm
[酷]

2019年11月20日 09点11分 2

蟹蟹你，大神

2019年11月20日 18点11分

搞错了

2019年11月21日 02点11分

f[i_, j_] = If[i <= j, Sum[j/Sin[x + j], {x, 1, j}], Sum[i/Cos[i + x], {x, 1, i}]]; Table[f[i, j], {i, 10}, {j, 10}] // MatrixForm

2019年11月21日 02点11分

看这个

2019年11月21日 02点11分