[问题] 关于用Mathematica解复数域内超越方程的根的问题 - MATLAB爱好者论坛-LabFans.com

sunmeng82 · 2010-12-05, 20:58

各位大侠，在超越方程的解时比较可行的办法是用FindRoot命令，比如FindRoot[Sin[x] == Log[x], {x, 1}]，但是貌似FindRoot命令只能够求解方程的实数根，复数域内无解。

小弟请教各位，有没有采用mathemati软件在复数域内求解超越方程的办法，或者其他软件也行。

zsy312 · 2010-12-19, 13:12

你把那个1换成I或任何一个虚数都可以。

zsy312 · 2010-12-19, 13:12

In[6]:= FindRoot[Sin[x] == Log[x], {x, 5 + 2 I}]

Out[6]= {x -> 7.75841\[VeryThinSpace]- 1.3583 I}

2010-12-05, 20:58	#1
sunmeng82 初级会员注册日期: 2010-09-28 年龄: 43 帖子: 11 声望力: 15	关于用Mathematica解复数域内超越方程的根的问题各位大侠，在超越方程的解时比较可行的办法是用FindRoot命令，比如FindRoot[Sin[x] == Log[x], {x, 1}]，但是貌似FindRoot命令只能够求解方程的实数根，复数域内无解。小弟请教各位，有没有采用mathemati软件在复数域内求解超越方程的办法，或者其他软件也行。

2010-12-19, 13:12	#2
zsy312 普通会员注册日期: 2008-08-17 年龄: 43 帖子: 77 声望力: 18	回复: 关于用Mathematica解复数域内超越方程的根的问题你把那个1换成I或任何一个虚数都可以。

2010-12-19, 13:12	#3
zsy312 普通会员注册日期: 2008-08-17 年龄: 43 帖子: 77 声望力: 18	回复: 关于用Mathematica解复数域内超越方程的根的问题 In[6]:= FindRoot[Sin[x] == Log[x], {x, 5 + 2 I}] Out[6]= {x -> 7.75841\[VeryThinSpace]- 1.3583 I}