※ 引述《iohan (iohan)》之铭言：
: 不是行列交换
: 例如
: | a 0 A |
: | 0 b B |
: | X Y c |
: 如果我要交换2,3基底
: 则变成
: | a A 0 |
: | X c Y |
: | 0 B b |
: 现在手上有一个元素数值已知,但内容计算相当复杂的矩阵
: 手动重新KEY IN 似乎很花时间
: 请问MATHEMATICA有没有对现成的矩阵进行基底次序调换的语法?
: 感谢各位先进
其实这是第 2,3 列交换再第 2,3 行交换
|1 0 0|
那么就左右各 Dot 上 |0 0 1| 即可
|0 1 0|
或者如果觉得 key 排列矩阵有点烦的话也可以用 Permute
Permute[#, {1,3,2}]& /@ Permute[matrix, {1,3,2}]
或更懒(?)的
Permute[#, Cycles[{{2,3}}]]& /@ Permute[matrix, Cycles[{{2,3}}]]