| 查看: 2359 | 回复: 4 | |||
| 【悬赏金币】回答本帖问题，作者白寒冰将赠送您 20 个金币 | |||
[求助]
matlab的fsolve函数求解隐函数绘图，遇到复数解怎么办已有1人参与
|
|||
|
用fsolve求解隐函数绘图，有的显示无解，这个图应该是蝶形的，但是不对，代码如下。可能是因为忽略了复数，因此又对结果进行判断，复数单独绘制，但是还是不对，求大神解答。 %用fsolve绘图 clc clear all; theta0=pi/1000:pi/1000:2*pi; for i=1:length(theta0) theta=theta0(i); C=3; D=(5/36)*pi; a=2; P3=20; E=8; K1=9*(1-E)^2; K2=-12*(1-E)^2+6*(1-E^2)*cos(2*theta); K3=10*(1-E)^2*(cos(2*theta))^2-4*(1-E)^2*(sin(D))^2*(cos(2*theta))^2-2*(1-E)^2*(sin(2*theta))^2-4*(1-E^2)*cos(2*theta)+(1+E)^2; K4=-4*(1-E)^2*cos(4*theta)+2*(1-E^2)*cos(2*theta)-4*(1-E^2)*(sin(D))^2*cos(2*theta)-(4*C*(1-E)*sin(2*D)*cos(2*theta))/P3; K5=(1-E)^2-(sin(D))^2*(1+E+(2*C*cos(D))/(P3*sin(theta)))^2; fun=@(r) K1*(a/r)^8+K2*(a/r)^6+K3*(a/r)^4+K4*(a/r)^2+K5; r_sln=fsolve(fun,pi/10); if isreal(r_sln)==1 r0(i)=r_sln; else r1(i)=abs(r_sln); bdelta = angle(r_sln); end end polar(theta0,r0,'. r'),hold on polar(bdelta,r1,'. y')  12.png  13.png  14.png  微信截图_20210127110318.png |
回复此楼» 猜你喜欢
Bioresource Technology期刊，第一次返修的时候被退回好几次了
已经有7人回复
-
2025冷门绝学什么时候出结果
已经有4人回复
-
真诚求助：手里的省社科项目结项要求主持人一篇中文核心，有什么渠道能发核心吗
已经有8人回复
-
寻求一种能扛住强氧化性腐蚀性的容器密封件
已经有5人回复
-
论文投稿，期刊推荐
已经有6人回复
-
请问哪里可以有青B申请的本子可以借鉴一下。
已经有4人回复
-
孩子确诊有中度注意力缺陷
已经有14人回复
-
请问下大家为什么这个铃木偶联几乎不反应呢
已经有5人回复
-
请问有评职称，把科研教学业绩算分排序的高校吗
已经有5人回复
-
天津工业大学郑柳春团队欢迎化学化工、高分子化学或有机合成方向的博士生和硕士生加入
已经有4人回复
hzlhm
至尊木虫 (著名写手)
- 应助: 387 (硕士)
- 金币: 18111.5
- 红花: 53
- 帖子: 2879
- 在线: 603.7小时
- 虫号: 1517335
- 注册: 2011-11-30
- 性别: GG
- 专业: 常微分方程与动力系统
2楼2021-01-27 18:31:54
3楼2021-01-28 12:29:00
hzlhm
至尊木虫 (著名写手)
- 应助: 387 (硕士)
- 金币: 18111.5
- 红花: 53
- 帖子: 2879
- 在线: 603.7小时
- 虫号: 1517335
- 注册: 2011-11-30
- 性别: GG
- 专业: 常微分方程与动力系统
4楼2021-01-28 12:54:20
5楼2021-01-28 15:05:32