24小时热门版块排行榜    

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

bakyym

木虫 (小有名气)

[求助] 关于牛顿法的问题。急急急 已有1人参与

利用Newton-Raphson求解方程式时,得到的解跳出了定义的解的范围该怎么办。怎样获得一种安全性比较高的求根方法?
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

bakyym

木虫 (小有名气)

引用回帖:
2楼: Originally posted by 月只蓝 at 2014-06-25 18:07:32
不知道你的具体程序是什么。
求解方程可以转换成最优问题,给根加上取值范围,等于是求解有约束的最优化问题。

SUBROUTINE NEWTON_RAPHSON(I,J,LAMBDA,F)

IMPLICIT NONE
COMMON/CONF1/RX,RY
COMMON/CONF3/SEMIA,SEMIB
COMMON/CONF4/THETA
COMMON/RAD/NBLA,NBLB

INTEGER,PARAMETER:: MAX=20,N=200
INTEGER I,J,M
DOUBLE PRECISION,PARAMETER::TOL=1.0D-6
DOUBLE PRECISION RX(N),RY(N)
DOUBLE PRECISION NBLA(N),NBLB(N)
DOUBLE PRECISION THETA(N)
DOUBLE PRECISION SEMIA(N),SEMIB(N)
DOUBLE PRECISION LAMBDA,RXIJ,RYIJ
DOUBLE PRECISION DX,F,DF2,DF

LAMBDA=SEMIA(I)/(SEMIA(I)+SEMIA(J))


DO M=1,100
   
   CALL FUNCD(I,J,LAMBDA,1,F,DF,DF2)
   
   DX=DF/DF2

   LAMBDA=LAMBDA-DX

   IF(ABS(DX)<TOL)THEN
     IF((0.0-LAMBDA)*(LAMBDA-1.0)<0)THEN
     
       PAUSE 'LAMBDA JUMP OUT THE BRACKETS '

     END IF
     GOTO 800
    END IF
END DO
具体的程序是这样的,函数是已知的,具体就是求df=0在λ{0,1}范围内的解。有时求出的λ值大于1或者小于0.所以不知道该怎么办
3楼2014-06-25 18:18:40
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 3 个回答

月只蓝

主管区长 (职业作家)

【答案】应助回帖

感谢参与,应助指数 +1
不知道你的具体程序是什么。
求解方程可以转换成最优问题,给根加上取值范围,等于是求解有约束的最优化问题。
MATLAB、MS小问题、普通问题请发帖求助!时间精力有限,恕不接受无偿私信求助。
2楼2014-06-25 18:07:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[公派出国] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +3 qTvzQBRAHjCi 2026-08-07 4/200 2026-08-08 17:27 by oEVWOejN9taj
[硕博家园] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 qTvzQBRAHjCi 2026-08-07 4/200 2026-08-08 17:19 by oEVWOejN9taj
[基金申请] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 qTvzQBRAHjCi 2026-08-07 5/250 2026-08-08 17:02 by oEVWOejN9taj
[基金申请] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 Vi50GxzrFcSG 2026-08-07 5/250 2026-08-08 16:27 by oEVWOejN9taj
[基金申请] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 Vi50GxzrFcSG 2026-08-07 4/200 2026-08-08 16:19 by oEVWOejN9taj
[博后之家] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 Vi50GxzrFcSG 2026-08-07 4/200 2026-08-08 16:02 by oEVWOejN9taj
[论文投稿] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 Vi50GxzrFcSG 2026-08-07 6/300 2026-08-08 15:07 by oEVWOejN9taj
[基金申请] 这样的filecode谁见过 +5 布布和一二 2026-08-08 8/400 2026-08-08 14:54 by archvillain
[博后之家] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 HEQlVqMTIA7d 2026-08-07 6/300 2026-08-08 14:42 by oEVWOejN9taj
[基金申请] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 HEQlVqMTIA7d 2026-08-07 4/200 2026-08-08 14:27 by oEVWOejN9taj
[论文投稿] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 HEQlVqMTIA7d 2026-08-07 5/250 2026-08-08 14:22 by oEVWOejN9taj
[教师之家] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 KXLV3nuBVBY7 2026-08-07 5/250 2026-08-08 14:07 by oEVWOejN9taj
[论文投稿] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 KXLV3nuBVBY7 2026-08-07 6/300 2026-08-08 14:01 by oEVWOejN9taj
[基金申请] 关于代码变化问题,想知道的进来 +11 且听虎啸 2026-08-07 14/700 2026-08-08 12:50 by 布布和一二
[硕博家园] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 Vi50GxzrFcSG 2026-08-07 6/300 2026-08-08 10:19 by 3OOjAIS77qg2
[基金申请] 化学口download_prp&amp;fileCode的固定段好像这几天一直没变,有变的大神么? +3 Tide man 2026-08-07 4/200 2026-08-07 22:39 by Tide man
[基金申请] 大家散了吧,后缀研究没有意义,别浪费时间了,过好目前的每一天,不要焦虑 +5 Tide man 2026-08-06 7/350 2026-08-07 13:11 by 医学老男孩
[基金申请] 求各位大神看下 100+6 hpkpkpkp 2026-08-05 33/1650 2026-08-06 14:49 by zhiyanjiang
[基金申请] 影响面上的因素 +8 布布和一二 2026-08-05 11/550 2026-08-06 10:41 by 宝贝虫子
[基金申请] 8月时间戳变的,举个手。玩一下,释放压力 +9 archvillain 2026-08-04 11/550 2026-08-05 20:06 by wlwhappy
信息提示
请填处理意见