东南大学_值分析_第二章_牛顿迭代法.docVIP

东南大学_值分析_第二章_牛顿迭代法.doc

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
第二章 非线性方程的解法 ——牛顿迭代法 ****(学号) ****(姓名) 算法与程序题目见教材P56 上机题目20。 一、算法原理 根据题目的要求,是关于用牛顿迭代法法求解方程的通用算法。该法是一种通过斜率迭代的算法,其速度比二分法和简单迭代法都要快。其简单原理如下: 设则存在一个数使得由如下定义的迭代序列收敛到: 对于函数,则其递推规则是 定义序列,则序列收敛到,也可表示为。现简要证明: 对于,写出牛顿迭代公式 该公式可化简为 二、流程图 题目要求于用牛顿迭代法法求解方程的通用算法。其计算过程主要用到迭代,图流程图1所示。 输入各参数 k=1 迭代 计算各误差 误差在允许范围之内 T F break k=k+1 kmaxN 输出 图1 题1关于牛顿迭代法的算法流程图 三、计算代码 核心代码 p1=……; if (errdelta)|(relerrdelta)|(abs(y)epsilon),break; if kmaxN ,go to 1 完整代码 程序1:Newton.m %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % Description : 牛顿迭代法 % Author : panyunqiang % Versoin : 1.0 % Date : 2012-9-21 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% function [p0, err, k, y]=Newton(p0, delta, epsilon, maxN) % input - p0 is the initial approximation to a zero of f % - delta is the tolerance for p0 % - epsilon is the tolerance for the function values y % - maxN is the maxium number of iterations %output - p0 is the Newton approximation to a zero % - err is the error estimate for p0 % - k is the number of iterations % - y is the function value f(p0) for k=1:maxN %%递归 p1=2*p0^3/(3*p0^2-3); %%计算误差 err=abs(p1-p0); relerr=2*err/(abs(p1)+delta); p0=p1; %%当前求出的根的函数值 y=p0^3/3-p0; %%判断 if (errdelta)|(relerrdelta)|(abs(y)epsilon) break; end end 程序2:Newton_Step.m %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % Description : 寻找题目中关于牛顿迭代法收敛的尽可能大的delta % 搜索步进为step=10^(-6),即精确到小数点后六位 % Author : panyunqiang % Versoin : 1.0 % Date : 2012-9-21 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% format long step=10^(-6); delta=10^-8;epsilon=10^-8;maxN=1000; ps=0.6; [p0, err, k, y]=Newton(ps, delta, epsilon, maxN); while((abs(p0)=epsilon)(p0~=NaN)) ps=ps+step; [p0, err, k, y]=Newton(ps, delta, epsilon, maxN); end ps-step 四、计算结果及分析 运行程序Newton_Step.m,获得Newto

文档评论(0)

xciqshic + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档