24小时热门版块排行榜    

查看: 583  |  回复: 4
当前主题已经存档。

小木虫:)

荣誉版主 (著名写手)

[交流] 【求助】请高手帮小虫编一个关于非线性方程组牛顿法的程序(已解决)

各位数值计算的高手,小虫一个朋友让我编一个程序,用牛顿迭代法数值求解一个非线性方程组

一式,((a1-x2)/a1)^2+(x3/b1)^2-1=0
二式,((a1-x2-a)/a2)^2+(x3/b2)^2-1=0
三式,x1+x2=h0
其中x1,x2,x3为未知数,其它字母皆为常数。

由于小虫电脑上还没有安装MATLAB和Fortran,所以调试成了大问题,害怕编错了,还是想向各位求助,能否帮小虫编一个计算这个非线性方程组的程序啊?

[ Last edited by formleaf on 2009-10-28 at 06:54 ]
回复此楼
霸道做事,厚道做人
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

haixing2008

荣誉版主 (文坛精英)

友情建议:“电脑上没有安装MATLAB和Fortran,所以调试成了大问题”
会吓人的,呵呵!还是安装一下吧。
自己可以先查查书,应该不难的。
编程还是得自己摸索一下,实在不行再问哦,不然学的东西肯定不多的,这是我的自身体会,呵呵
平平淡淡才是真!
2楼2009-10-27 08:26:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

小木虫:)

荣誉版主 (著名写手)

俺的电脑真的没有装MATLAB,朋友明天就要要了,哪位高手帮小虫调试一下这个程序吧

clear
clc
X=[0.5;0.5;0.5];                           %x1=0.5;x2=0.5;x3=0.5;赋予初值
a1=1;a2=2;a=1;b1=1;b2=3;h0=3;              %赋予常数值
err=1;                                     %赋予err初值
while err>0.2                              %循环条件要求总误差小于0.2
  X0=X;                                    %把X赋给X0
  FD=[0,2*(X0(2)-a1)/(a1*a1),2*X0(3)/b1;0,2*(X0(2)+a-a1)/(a2*a2),2*X0(3)/b2;1,1,0];
  F=[((a1-X0(2))/a1)^2+(X0(3)/b1)^2-1;((a1-X0(2)-a)/a2)^2+(X0(3)/b2)^2-1;X0(1)+X0(2)-h0];
  X=X0-inv(FD)*F;
  err=(X-X0)'*(X-X0);
end
X

不胜感激

[ Last edited by 小木虫 on 2009-10-27 at 22:58 ]
霸道做事,厚道做人
3楼2009-10-27 21:41:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhaocaijunzl

银虫 (小有名气)

★ ★ ★ ★ ★ ★
小木虫:)(金币+5,VIP+0):呵呵,我刚刚让那个同学自己把这个程序调试完了,不过还是感谢您 10-28 00:05
formleaf(金币+1,VIP+0):谢谢你的热心帮助! 10-28 06:52
我不是高手,刚好我有matlab7,于是就算了一下,
命令行输出的是:

ans =

  1.1111e+009

不知道什么意思。X是个向量啊!
4楼2009-10-28 00:00:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

小木虫:)

荣誉版主 (著名写手)

求助完毕,thanks everyone
霸道做事,厚道做人
5楼2009-10-28 00:06:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 小木虫:) 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 哪位老哥知道今年的国自然具体哪一天放榜? +9 Ldrop2023 2026-08-13 9/450 2026-08-16 13:24 by wukun_007
[基金申请] 我的国基提前知道中了,可是同事的操作让我实在接受不了,怎么会有这样的人 +11 家与远方 2026-08-10 16/800 2026-08-16 10:28 by ray43
[基金申请] 有时候,自然基金真的不能太认真 (我的申报经验) +10 majunge000 2026-08-11 12/600 2026-08-16 08:18 by xli1984
[基金申请] filecode=后面第一个是大写字母 +6 wangze12014 2026-08-14 7/350 2026-08-15 20:12 by gltch
[基金申请] filecode +8 cratir 2026-08-14 12/600 2026-08-15 18:08 by zyfgau
[基金申请] 小木虫上这么多卖论文的,真有人买论文么?感觉没必要啊 +12 Tide man 2026-08-10 13/650 2026-08-15 16:34 by 氺木
[基金申请] 关于Filecode分析方法 +10 majunge000 2026-08-10 13/650 2026-08-15 12:26 by hanpeng972
[基金申请] 各位道友,我要去昆明玩几天,回来见。 +7 Tide man 2026-08-14 8/400 2026-08-15 01:11 by arzu_hma
[基金申请] 奇怪,两个人的filecode固定段从头到尾一模一样 +8 布布和一二 2026-08-10 11/550 2026-08-14 14:58 by Equinoxhua
[硕博家园] 读博的好处 +4 lnee 2026-08-11 4/200 2026-08-14 10:20 by ahsoarli
[基金申请] filecode +15 documentary 2026-08-10 17/850 2026-08-14 10:08 by kissu88
[基金申请] FileCode能看出啥? +10 要乐观耀哥 2026-08-10 32/1600 2026-08-14 09:37 by 要乐观耀哥
[基金申请] 静等基金结果 +8 gjjjzhong 2026-08-10 21/1050 2026-08-13 17:56 by 且听虎啸
[基金申请] Filecode 又变了,巨变 +3 WH3796 2026-08-12 4/200 2026-08-13 14:13 by 小木虫6752397
[基金申请] 2019年青年基金涵评意见,大家看看几个A,几个B? +11 Tide man 2026-08-11 11/550 2026-08-13 07:35 by 撸猫猫
[基金申请] 综述论文作为代表作会不会影响评审专家的印象分? +11 yufeiwaner 2026-08-09 13/650 2026-08-12 08:17 by yufeiwaner
[基金申请] 帮忙看看fileCode +7 wwncly 2026-08-10 13/650 2026-08-11 19:36 by 冰心玉壶晴
[基金申请] 为什么网上很多人说本周 12号出结果 +6 瞬息宇宙 2026-08-10 7/350 2026-08-11 19:25 by Tide man
[基金申请] 确定了,国自然21号放榜 +6 布布和一二 2026-08-10 7/350 2026-08-10 19:15 by 2000zf36392
[基金申请] 国自然结果 +4 Vierhys 2026-08-10 8/400 2026-08-10 15:06 by Vierhys
信息提示
请填处理意见