Mathematica怎么进行归一化.比如:a,a+1,a+2正交,使其平方和为1.

问题描述:

Mathematica怎么进行归一化.比如:a,a+1,a+2正交,使其平方和为1.

In[53]:= Assuming[a \[Element] Reals,Simplify@Normalize[{a,a + 1,a + 2} ]]Out[53]= {a/Sqrt[5 + 6 a + 3 a^2],(1 + a)/Sqrt[5 + 6 a + 3 a^2],(2 + a)/Sqrt[5 + 6 a + 3 a^2]}