Question

Mathematica矩阵单行元素求和（包括横竖斜求和），运行成功的加分

如题，单行求和
例list={{1，2，3}，{4，5，6}，{7，8，9}}
求单行的和，包括横竖斜三方面求和，用SUM函数不行，最好附代码
还有怎么提取单个元素啊，告诉我一下吧，谢啦~~~

Answer 1

Clear[list, hang, lie, i, j]
list = {{1, 2, 3}, {4, 5, 6}, {7, 8, 9}};
hang = Table[Sum[list[[i, j]], {j, 1, 3}], {i, 1, 3}];
lie = Table[Sum[list[[i, j]], {i, 1, 3}], {j, 1, 3}];
list // MatrixForm
hang // MatrixForm
lie // MatrixForm

提取 矩阵的值 是\
设 A={{a,b,c},{d,e,f}}
a的值的提取是 A[[1,1]]
通式是
第 i 行第 j 列 A[[i,j]]