用Mathematica求解一个包含许多变量的非线性方程

Question

我有一个漂亮的等式，我试图计算R2。我正在使用Mathematica。到目前为止，我尝试使用Solve []或Reduce []的每一次计算都需要永远。我希望你可以帮助我如何处理这种美丽，以获得解决方案。谢谢！以下是我的等式。

if (variable1 == null) {
    variable1 = "-";
}

Answer 1

我要注意的一点是，使用^（1/2）或Sqrt []比^ 0.5更好：Mathematica非常小心区分实数（带小数点）和整数或有理数。

尽管你做出了这样的改变，但我担心获得一个好的分析解决方案的可能性很小。如果你考虑重新排列方程以摆脱平方根的方法，你最终必须平方两次，这样你最终会得到一个四次方程式。原则上它是分析上可溶的，但只有在特殊情况下才能使解决方案足够紧凑而有用。

Answer 2

你的表达形式是这样的：

 a + Sqrt[b + c R2 + d R2^2] == e R2 + Sqrt[f + g R2 + h R2^2]

Solve随时返回四种解决方案。 现在只需根据原始参数（a,b,c..等）计算出这些参数（vox,voy,..）并替换为Solve结果。 （我怀疑结果太难以实用了。）