用mathematica求解方程Solve[8 Cos[0.5x] - 4x Sin[0.5x] == 0, x] 出不
来源:学生作业帮 编辑:作业帮 分类:数学作业 时间:2024/07/14 15:19:49
用mathematica求解方程Solve[8 Cos[0.5x] - 4x Sin[0.5x] == 0, x] 出不来答案,是咋么回事
显示Solve::tdep: The equations appear to involve the variables to be solved for in an essentially non-algebraic way. >>
显示Solve::tdep: The equations appear to involve the variables to be solved for in an essentially non-algebraic way. >>
Solve和NSolve都是求解多项式方程的,对于大多数超越方程来说,只能用迭代法或者割线法求解,此时要用FindRoot函数.
用Plot[8 Cos[0.5 x] - 4 x Sin[0.5 x] == 0,{x,-20,20}]可以看出,这个方程应该有无数个根,看你需要的是哪一个.比如从图像上看,在2附近有一个根且比2小,如果这正是你需要的,可以运行
FindRoot[8 Cos[0.5 x] - 4 x Sin[0.5 x] == 0,{x,2}]
或者
FindRoot[8 Cos[0.5 x] - 4 x Sin[0.5 x] == 0,{x,1,2}]
前者用的迭代法,后者用的割线法.运行结果都为
{x -> 1.72067}
想要更高的精度可以通过调整机器计算精度实现.
其他位置的根情况类似.
用Plot[8 Cos[0.5 x] - 4 x Sin[0.5 x] == 0,{x,-20,20}]可以看出,这个方程应该有无数个根,看你需要的是哪一个.比如从图像上看,在2附近有一个根且比2小,如果这正是你需要的,可以运行
FindRoot[8 Cos[0.5 x] - 4 x Sin[0.5 x] == 0,{x,2}]
或者
FindRoot[8 Cos[0.5 x] - 4 x Sin[0.5 x] == 0,{x,1,2}]
前者用的迭代法,后者用的割线法.运行结果都为
{x -> 1.72067}
想要更高的精度可以通过调整机器计算精度实现.
其他位置的根情况类似.
用mathematica求解方程Solve[8 Cos[0.5x] - 4x Sin[0.5x] == 0, x] 出不
方程为(d^2x)/(dt^2)+a*sin(x)=0的mathematica 和matlab求解命令
用mathematica求Solve[{a*x (1 - x/k) - (c*x)/(m + x) y = 0, 1 -
怎么用matlab求解cos(x)-x*sin(x)=0并画出y=cos(x)-x*sin(x)的图像?急用!
怎么用MATLAB解超越方程cos(x)-2*x*sin(x)-x-0.5*sin(x)*cosh(x)/sinh(x)
matlab方程求解:x=0:5:200;y=solve(’sin(a)+x*a=1‘);plot(x,y)?
谁知道用matlab怎么求解1-cos(x)*cosh(x)-sin(x)*sinh(x)=0这个方程的前十个解么?
matlab求解三角函数.cos(x)*cosh(x)=1 我用solve(cos(x)*cosh(x)=1,x) 为什
5sin^2(X)+sin(2X)-cos^2(X)=1, 求解X
求解 ∫sin(6x)^3*cos(6x)^8 dx=? 范围[pi/2,0]
MATLAB画图,y=sin(x)*(cos(x)-1)/((2*sin(x.^2)+4*cos(x)).^0.5)-(
请问用matlab如何求一下方程sin(x)-0.3cos(x)=0.5中的未知数x?