不求代码只求思路，老师布置的作业，实在没大有思路了

不求代码，只求大神能够给个简单的思路，非常感谢。题目原文在此，Mathematica中，FindRoot命令能够求出方程的根，但每次使用FindRoot，只能求出一个根，试利用FindRoot函数，编写新的函数FRoots，它能够求出单变量方程在某个范围的所有根，并要求函数FRoots返回的根不重复，最后，利用函数FRoots求出下列方程的根：

不理解为什么老师一定要让用FindRoot，个人感觉Reduce也可以做，但是不允许用，希望大神能够给个用FindRoot的思路

不感兴趣

开通SVIP免广告

回复 Loydman :方程x^7 - 4*x^5 + 8*x - 5==0的所有根，包括复数根。方程x^2*Sin[5*x] == Cos[2*x]在区间[0, 2]范围内的所有实数根。原代码

破系统你再删一个试试？回复 Loydman :方程x^7 - 4*x^5 + 8*x - 5==0的所有根，包括复数根。方程x^2*Sin[5*x] == Cos[2*x]在区间[0, 2]范围内的所有实数根

……直观感觉是题目出得太难了，还是说你这题是开放性问题之类的？总之，除了你已经找到的RootSearch程序包，还可以参考SE帖子《How to find numerically all roots of a function in a given range?》：mathematica.stackexchange.com/q/91784/1871

我老师也出了这个题悲。

扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！

6回复贴，共1页

<<返回mathematica吧

分享到:

日	一	二	三	四	五	六