Question

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

Answer 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]}