2023年数学软件实验报告数值微积分与方程数值求解_第1页
2023年数学软件实验报告数值微积分与方程数值求解_第2页
2023年数学软件实验报告数值微积分与方程数值求解_第3页
2023年数学软件实验报告数值微积分与方程数值求解_第4页
2023年数学软件实验报告数值微积分与方程数值求解_第5页
已阅读5页,还剩15页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

附件二:实验项目列表序号实验项目名称成绩指导教师1MATLAB运算基础2MATLAB矩阵分析与解决3选择结构程序设计4循环结构程序设计5函数文献6MATLAB的绘图操作7数据解决与多项式计算8数值微积分与方程数值求解9符号计算基础与符号微积分10总评ﻬ附件三:实验报告(八)系:专业:年级:姓名:学号:实验课程:实验室号:_实验设备号:实验时间:指导教师签字:成绩:1.实验项目名称:数值微积分与方程数值求解2.实验目的和规定1.掌握利数据记录和分析的方法2.掌握数值插值与曲线拟合的方法及其应用3.掌握多项式的常用运算3.实验使用的重要仪器设备和软件方正商祺N260微机;MATLAB7.0或以上版本4.实验的基本理论和方法(1)sym(x):定义符号变量(2)det(X):矩阵行列式的值(3)polyder(P):多项式的导函数(4)[l,n]=quad(‘fnsme’,a,b,tol,trace):求定积分(5)直接解法:x=A\b(6)矩阵分解求法:[L,U]=lu(A);x=U\(L\b)(7)迭代解法:[x,n]=jacobi(A,b,[0,0,0,0]',1.0e-6)(8)[x,y]=line_solution(A,b):线性方程组的通解(9)fzero(filename,x0,tol,trace):单变量非线性方程求解(10)fsolve(filename,x0,option):非线性方程组的求解(11)[x,fval]=fminbnd(filename,x1,x2,option):求(x1,x2)区间的极小值点x和最小值fval(12)[x,fval]=fminsearch(filename,x0,option):基于单纯形算法求多元函数极小值点x和最小值fval(13)[t,y]=ode45(filename,tspan,y0):龙格-库塔法求微分方程的数值解

(14)subplot(m,n,p):子图函数(15)plot(x,y):绘图函数5.实验内容与环节(描述实验中应当做什么事情,如何做等,实验过程中记录发生的现象、中间结果、最终得到的结果,并进行分析说明)(涉及:题目,写过程、答案)题目:1.求函数在指定点的数值导数functiondsx=input('请输入x的值:');p=6*x^2>>x=sym('x');>>f=det([x,x.^2,x.^3;1,2.*x,3.*x.^2;0,2,6.*x])f=2*x^3>>f=[2,0,0,0];>>p=polyder(f)p=600>>ds请输入x的值:1p=6>>ds请输入x的值:2p=24>>ds请输入x的值:3p=542.用数值方法求定积分的近似值。(1)functionf=f(t)f=sqrt(cos(t.^2)+4.*sin(2.*t.^2)+1);>>I1=quad('f',0,2*pi)I1=7.18+3.88i(2)functiong=g(x)g=log(1+x)./(1+x.^2);>>I2=quad('g',0,1)I2=0.272分别用3种不同的数值方法解线性方程组functionjfczinput('直接解法');A=[6,5,-2,5;9,-1,4,-1;3,4,2,-2;3,9,0,2];b=[-4,13,1,11]';x=A\binput('矩阵分解求解');[L,U]=lu(A);x=U\(L\b)input('迭代解法');[x,n]=jacobi(A,b,[0,0,0,0]',1.0e-6)function[y,n]=jacobi(A,b,x0,eps)ifnargin==3eps=1.0e-6;elseifnargin<3errorreturnendD=diag(diag(A));L=-tril(A,-1);U=-triu(A,1);B=D\(L+U);f=D\b;y=B*x0+f;n=1;whilenorm(y-x0)>=epsx0=y;y=B*x0+f;n=n+1;end>>szqj直接解法x=-3.83330.500014.25009.0000矩阵分解求解x=-3.83330.500014.25009.0000迭代解法x=1.0e+307*-2.3556-Inf-Inf-Infn=6014.求非齐次线性方程的通解functiontjA=[2,7,3,1;3,5,2,2;9,4,1,7];b=[6,4,2]';[x,y]=line_solution(A,b);x,yfunction[x,y]=line_solution(A,b)[m,n]=size(A);y=[];ifnorm(b)>0ifrank(A)==rank([A,b])ifrank(A)==ndisp('方程有唯一解x');x=A\b;elsedisp('原方程组有无穷个解,特解为x,其另一方面方程组的基础解系为y');x=A\b;y=null(A,'r');endelsedisp('方程组无解');x=[];endelsedisp('原方程组有零解x');x=zeros(n,1);ifrank(A)<ndisp('原方程组有无穷个解,基础解系为y');y=null(A,'r');endend>>tj原方程组有无穷个解,特解为x,其另一方面方程组的基础解系为yWarning:Rankdeficient,rank=2,tol=8.6112e-015.>Inline_solutionat11Intjat4x=-0.18180.909100y=0.0909-0.8182-0.45450.09091.0000001.0000所以方程的通解为:x=k1+k2+5.求代数方程的数值解,在=1.5附近的根。在给定的初值=1,=1,=1下,求方程组的数值解。functionf=f1(x)f=3*x+sin(x)-exp(x);>>fzero('f1',1.5)ans=1.8900functionf=f2(p)x=p(1);y=p(2);z=p(3);f(1)=sin(x)+y.^2+log(z)-7;f(2)=3*x+z.^y-z.^3+1;f(3)=x+y+z-5;>>x=fsolve('f2',[1,1,1],optimset('Display','off'))x=0.59512.39622.00876.求函数在指定区间的极值在(0,1)内的最小值。在[0,0]附近的最小值点和最小值。functionf=fm1(x)f=(x.^3+cos(x)+x*log(x))/exp(x);>>fminbnd('fm1',0,1)Warning:Logofzero.>Infm1at2Infminbndat176ans=0.5223functionf=fm2(u)x1=u(1);x2=u(2);f=2.*(x1.^3)+4.*x1.*(x2.^3)-10.*x1.*x2+x2.^2;>>[U,fmin]=fminsearch('fm2',[0,0])U=1.00160.8335fmin=-3.32417.求微分方程的数值解functionydot=szj(x,y)ydot=[(5*y(1)-y(2))/x;y(1)];>>[x,y]=ode45('szj',[-1,1],[0,0])x=-1.0000-0.9500-0.9000-0.8500-0.8000-0.7500-0.7000-0.6500-0.6000-0.5500-0.5000-0.4500-0.4000-0.3500-0.3000-0.2500-0.2023-0.1500-0.1000-0.0500-0.00000.05000.10000.15000.20230.25000.30000.35000.40000.45000.50000.55000.60000.65000.70000.75000.80000.85000.90000.95001.0000y=00000000000000000000000000000000000000000000000000000000000000000000000000000000008.求微分方程的数值解,并绘制解的曲线。functiony=sz(x,y)y=[y(2)*y(3);-y(1)*y(3);-0.51*y(1)*y(2)];>>[x,y]=ode45('sz',[0,1],[0,1,1])x=00.00010.00010.00020.00020.00050.00070.00100.00120.00250.00370.00500.00620.01250.01880.02510.03130.05630.08130.10630.13130.15630.18130.20630.23130.25630.28130.30630.33130.35630.38130.40630.43130.45630.48130.50630.53130.55630.58130.60630.63130.65630.68130.70630.73130.75630.78130.80630.83130.85630.88130.90630.93130.94850.96570.98281.0000y=01.00001.00000.00011.00001.00000.00011.00001.00000.00021.00001.00000.00021.00001.00000.00051.00001.00000.00071.00001.00000.00101.00001.00000.00121.00001.00000.00251.00001.00000.00371.00001.00000.00501.00001.00000.00621.00001.00000.01250.99991.00000.01880.99980.99990.02510.99970.99980.03130.99950.99970.05630.99840.99920.08120.99670.99830.10600.99440.99710.13080.99140.99560.15540.98790.99380.17990.98370.99170.20420.97890.98930.22830.97360.98660.25220.96770.98360.27590.96120.98040.29930.95420.97690.32250.94660.97310.34530.93850.96910.36790.92990.96490.39020.92070.96040.41210.91110.95570.43370.90100.95080.45500.89050.94570.47580.87950.94050.49630.86810.93510.51640.85630.92950.53610.84410.92380.55540.83160.91800.57430.81870.91200.59270.80540.90600.61080.79180.89990.62840.77790.89370.64550.76370.88740.66230.74930.88

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论