求助像Sin[ax]=x,这样的如何给定不同的值,求x的数值解
mathematica吧
全部回复
仅看楼主
level 3
hdguangshan3
楼主
2017年12月01日 02点12分
1
level 12
Alexander0620
超越方程第一步应该是作图
2017年12月01日 03点12分
2
level 3
hdguangshan3
楼主
这只是我举得一个例子,由于我的方程比较复杂,想问可不可以数值求解
2017年12月01日 03点12分
3
level 1
这里的MV
s = {0, 0};
For[i = 1, i <= 2, i++,
s[[i]] = Solve[Table [a x + 1 == 2, {a, 1, 2}][[i]], x]];
s
我这么实现的,但是感觉有点复杂
2017年12月01日 14点12分
5
吧务
level 15
xzcyr
关于For,来先把这帖看了:
https://tieba.baidu.com/p/5104865347
超越方程数值解可以用FindRoot或者RootSearch程序包(
http://library.wolfram.com/infocenter/Demos/4482/
):
Table[FindRoot[Sin[a x] == x, {x, 5, 0, 10}], {a, 10, 20}]
初始猜测选的比较随便,如果需要找特定位置的解还得继续调。
2017年12月02日 07点12分
7
1