wolfram-mathematica - 求解一个变量的混合方程

Question

我有这个等式，想求解 v。我试过 Mathematica，但它做不到。有什么软件、语言可以解决吗？

等式:

Solve[1 + 0.0914642/v^5 - 1.87873/v^4 + 96.1878/v^2 - (
17.3914 E^(-(0.0296/v^2)) (1.398 + 0.0296/v^2))/v^2 - 0.947895/v - 
1.37421 v == 0, v]

文本文件/m 文件是here .

Answer 1

使用 Mathematica 9:-

Clear[v]

expr = 1 + 0.0914642/v^5 - 1.87873/v^4 + 96.1878/v^2 - (
     17.3914 E^(-(0.0296/v^2)) (1.398 + 0.0296/v^2))/v^2 - 0.947895/v -
   1.37421 v;

sol = Solve[expr == 0, v, Reals]

{{v -> -0.172455}, {v -> 0.0594091}, {v -> 0.105179}, {v -> 3.93132}}

检查解决方案:-

roots = v /. sol;
(v = #; expr) & /@ roots

{2.27374*10^-13, 2.32703*10^-12, -9.66338*10^-13, -1.77636*10^-15}

(v = #; Chop[expr]) & /@ roots

{0, 0, 0, 0}