返回   MATLAB中国论坛|MATLAB爱好者之家—不仅仅是MATLAB! > 特色讨论区:工程数学软件-不仅仅是MATLAB! > Mathematica论坛 > [求助] 求助,利用findroot解多元超越方程组


Mathematica论坛 Mathematica是比较流行的符号运算软件之一



主题: [求助] 求助,利用findroot解多元超越方程组 回复主题
您的用户名: 点击这里登录
图像验证
请输入图像中的六位数字或字母。

标题:
  
信息:
信息图标
您可以从下面的列表中选择信息图标:
 

附加选项
其他选项

主题回顾 (新帖在前)
2019-01-02 07:24 PM
zhangzhehome0306 FindRoot[{Do[Im[za[i][n][m]] == 0, {n, 1, 5}, {m, 1, 2}],
Do[(K2*(f[i][1][1])^2)/za[i][1][1]/((K2*(f[i][n][m])^2)/
za[i][n][m]) - (
f[i][1][1]*Sin[k*l[i][1][1]]*VS[[1, 1]]/V[[1, 1]])/(
f[i][n][m]*Sin[k*l[i][n][m]]*VS[[m, n]]/V[[m, n]]) == 0, {n, 2,
5}, {m, 1, 2}],
Do[Sum[(K2*(f[i][n][m])^2)/za[i][n][m], {n, 1, 5}] == 0.5, {m, 1,
2}]}, {{x[i][1][1], 0.1}, {x[i][2][1], -0.1}, {x[i][3][1],
0.1}, {x[i][4][1], -0.1}, {x[i][5][1], 0.1}, {y[i][1][1],
1.01}, {y[i][2][1], 1.01}, {y[i][3][1], 1.01}, {y[i][4][1],
1.01}, {y[i][5][1], 1.01}, {x[i][1][2],
0.1}, {x[i][2][2], -0.1}, {x[i][3][2],
0.1}, {x[i][4][2], -0.1}, {x[i][5][2], 0.1}, {y[i][1][2],
1.01}, {y[i][2][2], 1.01}, {y[i][3][2], 1.01}, {y[i][4][2],
1.01}, {y[i][5][2], 1.01}}, MaxIterations -> 1000];


新手求助!就是想解一个超越方程组的解,这个是肯定有解的,但是由于方程数目太多写起来太麻烦,所以想通过Do循环表示,但是这样软件会报错,求问各位有没有表达方法,因为这些方程都可以通过表达式来表示,不知道我这样写哪里不符合规范了。提示的错误以及这个代码的截图在附件里!

发帖规则
不可以发表新主题
可以发表回复
不可以上传附件
不可以编辑自己的帖子

启用 BB 代码
论坛启用 表情符号
论坛启用 [IMG] 代码
论坛禁用 HTML 代码


所有时间均为北京时间。现在的时间是 12:33 AM


Powered by vBulletin
版权所有 ©2000 - 2019,Jelsoft Enterprises Ltd.

SEO by vBSEO ©2009, Crawlability, Inc.