24小时热门版块排行榜    

Znn3bq.jpeg
查看: 1958  |  回复: 11
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

klding

新虫 (小有名气)

[求助] 牛顿迭代解方程画曲线 已有2人参与

最近需根据一个方程计算用matlab来画一个图,但是总是不出结果,在此向大家求助。
方程如下图,方程中有3个符号变量,其中a和C0是通过前面的数值计算计算出来的,然后在a为某一值时,做出C0-Cw曲线。这里希望就是对a一定时,C0=0.1:0.1:10,分别求出对应的Cw的各个数据,而不是利用隐函数ezplot()来画图,如下图所示。
我现在编的若已知a和Co求Cw的话,可以做出来这单个的一组,但是一旦来做这条曲线时就怎么弄都弄不出来。希望大家帮忙看一下,指点一二(后面赋有一个matlab文件)。

牛顿迭代解方程画曲线
公式.png


牛顿迭代解方程画曲线-1
曲线.jpg
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wurongjun

专家顾问 (职业作家)

【答案】应助回帖

感谢参与,应助指数 +1
Matlab的优势是数值计算!
不要使用syms命令最好!
否则很慢!
善恶到头终有报,人间正道是沧桑.
9楼2016-12-14 17:50:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 12 个回答

bluesine

铁杆木虫 (职业作家)

科苑小木虫

【答案】应助回帖

感谢参与,应助指数 +1
把你的程序稍微改动了一下,不多说,看code:

clear; clc;
a=0.6;
syms Cw Cw0;

C=0.1;
i=1;
while C<=10

f=Cw-1/(1-a^4)*(4/pi*(1/3*(2.5-1/(Cw+C)^2)*(1-1/(Cw+C)^2)^0.5+(Cw+C)/2*asin(1/(Cw+C)))-a^4*(Cw+C));%%牛顿迭代形式
df=diff(f,Cw);
eps=1e-7;
Cw0=10.0;
cnt=0;
MAXCNT=200; %最大循环次数

while cnt<MAXCNT      %防止无限循环
    Cw1=Cw0-subs(f,Cw,Cw0)/subs(df,Cw,Cw0); %去掉这个分号,可以看到迭代过程。
     if (abs(Cw1-Cw0)<eps)         
      break;
    end
    Cw0=Cw1;
    cnt=cnt+1;
end
error=abs(Cw1-Cw0)/2;  %%误差
if cnt==MAXCNT || error > eps
    disp(['不收敛@C=',num2str(C)]);
    continue;
end

Y(i) =Cw0;
i=  i+1;
C = C+0.1;
end

X = 0.1:0.1:10;
plot(X,Y,'r','LineWidth',2);
xlabel('{\itC}_0');
ylabel('{\itC}_w');
disp('done...')
板凳要做十年冷文章不发一个字
3楼2016-12-13 15:21:16
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

klding

新虫 (小有名气)

引用回帖:
3楼: Originally posted by bluesine at 2016-12-13 15:21:16
把你的程序稍微改动了一下,不多说,看code:

clear; clc;
a=0.6;
syms Cw Cw0;

C=0.1;
i=1;
while C<=10

f=Cw-1/(1-a^4)*(4/pi*(1/3*(2.5-1/(Cw+C)^2)*(1-1/(Cw+C)^2)^0.5+(Cw+C)/2*asin(1 ...

你好,很感谢你。但是我把你的程序导进去后发现进入死循环了,停不下来啊
4楼2016-12-13 21:09:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

bluesine

铁杆木虫 (职业作家)

科苑小木虫

【答案】应助回帖

引用回帖:
4楼: Originally posted by klding at 2016-12-13 21:09:49
你好,很感谢你。但是我把你的程序导进去后发现进入死循环了,停不下来啊...

并不是死循环,具体看电脑配置。。因为没有输出中间结果,需要等一会,我的大概在15秒左右出结果。看附件
牛顿迭代解方程画曲线-2
test.jpg

板凳要做十年冷文章不发一个字
6楼2016-12-14 09:21:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考博] 华师大读博 +3 xq83 2026-04-22 3/150 2026-04-22 03:56 by 啊哒哒哒叨
[论文投稿] 急需审稿人!!! +3 陆小果画大饼 2026-04-21 3/150 2026-04-21 23:54 by jzy_123456
[考博] 申博/考博 +4 啃面包的小书虫 2026-04-17 8/400 2026-04-21 16:26 by 啃面包的小书虫
[考研] 一志愿A区211,22408 321求调剂 +7 随心所欲☆ 2026-04-15 8/400 2026-04-21 08:22 by Equinoxhua
[考研] 085600材料与化工调剂 5+3 孜孜不倦2002 2026-04-19 6/300 2026-04-20 21:25 by babero
[论文投稿] 期刊推荐 +3 材料研究生 2026-04-15 5/250 2026-04-20 16:02 by 豆豆7758
[论文投稿] 有没有接收比较快的sci期刊呀,最好在一个月之内的,研三孩子求毕业 20+4 之护着 2026-04-16 7/350 2026-04-20 15:45 by 豆豆7758
[考研] 337求调剂 +3 jyz04 2026-04-18 3/150 2026-04-20 12:24 by 研可安
[考博] 申博 +3 Xyyx. 2026-04-18 3/150 2026-04-20 10:44 by YuY66
[考研] 304求调剂 +8 castLight 2026-04-16 8/400 2026-04-19 17:14 by 中豫男
[考研] 求调剂 +10 小聂爱学习 2026-04-16 12/600 2026-04-19 16:51 by 中豫男
[考研] 求调剂 +6 苦命人。。。 2026-04-18 7/350 2026-04-19 16:27 by 中豫男
[考研] 294求调剂 +15 淡然654321 2026-04-15 15/750 2026-04-19 08:20 by cuisz
[考研] 0854求调剂 +23 门路摸摸 2026-04-15 27/1350 2026-04-19 01:59 by 烟雨流涯
[考研] 接受任何调剂 +6 也就是栗子 2026-04-17 7/350 2026-04-18 17:20 by 涵竹刘
[考研] 收到复试调剂但是去不了 +8 小蜗牛* 2026-04-16 8/400 2026-04-18 11:15 by zixin2025
[考研] 260求调剂 +4 Zyt1314520.. 2026-04-17 5/250 2026-04-18 08:28 by babysonlkd
[考研] 急需调剂 +9 绝不放弃22 2026-04-15 10/500 2026-04-18 08:09 by chixmc
[有机交流] 二苯甲酮酸类衍生物 50+3 小白爱主人 2026-04-17 6/300 2026-04-17 18:47 by kf2781974
[考研] 322求调剂 +6 tekuzu 2026-04-17 6/300 2026-04-17 13:48 by Espannnnnol
信息提示
请填处理意见