Mathematica 无法使用系数求解系统
Mathematica is unable to solve the system using coefficients
我正在尝试求解给定输入值的方程式，以便 Mathematica 可以处理答案并产生结果。但是，当我尝试这样做时，它不喜欢我给出的等式：
Solve[(Exp[2 h] - 1 - 2 h)/(5 h^2) == 0.1, h]
Solve was unable to solve the system with inexact coefficients or the system obtained by direct rationalization of inexact numbers present in the system. Since many of the methods used by Solve require exact input, providing Solve with an exact version of the system may help.
Solve[(-1 + E^(2 h) - 2 h)/(5 h^2) == 0.1, h]
如果无法提供解决方案，则会显示错误"Solve::inex"，即上面的文字。我不确定我是否必须对我的输入参数更加明确。我试图将 h 设置为 0.1（以及其他值，例如 002、-0:0001、-0:00002）并获得一个十进制值。使用 NSolve 也不会产生结果。
Solve 通常更擅长多项式问题而不是超越问题。 Reduce 通常更擅长先验问题，但它也声称自己无法破解这个问题。所以接下来我要做的是
Plot[{(Exp[2 h] - 1 - 2 h)/(5 h^2), 0.1 },{h,-5,3}]
这告诉我你的函数运行良好并且有一个接近 -3 的解。
FindRoot 如果给定一个表现良好的问题和良好的初始猜测，则在寻找根时通常会非常激进。于是
h/.FindRoot[(Exp[2 h] - 1 - 2 h)/(5 h^2) == 0.1 ,{h,-3}]
几乎立即告诉我唯一的（真正的）根在 -3.41498 附近
这项技术应该同样适用于等式右侧的其他正值，甚至可能只对 h 可能是什么进行非常粗略的估计。对于右侧的负值，我怀疑您可能还有其他问题。在尝试使用 FindRoot
之前，您可以使用 Plot 进行调查
我正在尝试求解给定输入值的方程式，以便 Mathematica 可以处理答案并产生结果。但是，当我尝试这样做时，它不喜欢我给出的等式：
Solve[(Exp[2 h] - 1 - 2 h)/(5 h^2) == 0.1, h]
Solve was unable to solve the system with inexact coefficients or the system obtained by direct rationalization of inexact numbers present in the system. Since many of the methods used by Solve require exact input, providing Solve with an exact version of the system may help.
Solve[(-1 + E^(2 h) - 2 h)/(5 h^2) == 0.1, h]
如果无法提供解决方案，则会显示错误"Solve::inex"，即上面的文字。我不确定我是否必须对我的输入参数更加明确。我试图将 h 设置为 0.1（以及其他值，例如 002、-0:0001、-0:00002）并获得一个十进制值。使用 NSolve 也不会产生结果。
Solve 通常更擅长多项式问题而不是超越问题。 Reduce 通常更擅长先验问题，但它也声称自己无法破解这个问题。所以接下来我要做的是
Plot[{(Exp[2 h] - 1 - 2 h)/(5 h^2), 0.1 },{h,-5,3}]
这告诉我你的函数运行良好并且有一个接近 -3 的解。
FindRoot 如果给定一个表现良好的问题和良好的初始猜测，则在寻找根时通常会非常激进。于是
h/.FindRoot[(Exp[2 h] - 1 - 2 h)/(5 h^2) == 0.1 ,{h,-3}]
几乎立即告诉我唯一的（真正的）根在 -3.41498 附近
这项技术应该同样适用于等式右侧的其他正值，甚至可能只对 h 可能是什么进行非常粗略的估计。对于右侧的负值，我怀疑您可能还有其他问题。在尝试使用 FindRoot
Plot 进行调查