在mathematica中创建一个符号正交矩阵

mar*_*lus 6 wolfram-mathematica

我需要在Mathematica中创建一个3乘3的实际正交符号矩阵.我怎么能这样做?

Dan*_*lau 11

不是我推荐这个,但......

m = Array[a, {3, 3}];
{q, r} = QRDecomposition[m];
q2 = Simplify[q /. Conjugate -> Identity]
Run Code Online (Sandbox Code Playgroud)

所以q2是一个符号正交矩阵(假设我们在实数上工作).