数学实验1
- 格式:docx
- 大小:100.13 KB
- 文档页数:5
MATLAB数学实验报告1Matlab数学实验报告⼀、实验⽬的通过以下四组实验,熟悉MATLAB的编程技巧,学会运⽤MATLAB的⼀些主要功能、命令,通过建⽴数学模型解决理论或实际问题。
了解诸如分岔、混沌等概念、学会建⽴Malthu模型和Logistic 模型、懂得最⼩⼆乘法、线性规划等基本思想。
⼆、实验内容2.1实验题⽬⼀2.1.1实验问题Feigenbaum曾对超越函数y=λsin(πx)(λ为⾮负实数)进⾏了分岔与混沌的研究,试进⾏迭代格式x k+1=λsin(πx k),做出相应的Feigenbaum图2.1.2程序设计clear;clf;axis([0,4,0,4]);hold onfor r=0:0.3:3.9x=[0.1];for i=2:150x(i)=r*sin(3.14*x(i-1));endpause(0.5)for i=101:150plot(r,x(i),'k.');endtext(r-0.1,max(x(101:150))+0.05,['\it{r}=',num2str(r)]) end加密迭代后clear;clf;axis([0,4,0,4]);hold onfor r=0:0.005:3.9x=[0.1];for i=2:150x(i)=r*sin(3.14*x(i-1));endpause(0.1)for i=101:150plot(r,x(i),'k.');endend运⾏后得到Feigenbaum图2.2实验题⽬⼆2.2.1实验问题某农夫有⼀个半径10⽶的圆形⽜栏,长满了草。
他要将⼀头⽜拴在⽜栏边界的桩栏上,但只让⽜吃到⼀半草,问拴⽜⿐⼦的绳⼦应为多长?2.2.2问题分析如图所⽰,E为圆ABD的圆⼼,AB为拴⽜的绳⼦,圆ABD为草场,区域ABCD为⽜能到达的区域。
问题要求区域ABCD等于圆ABC的⼀半,可以设BC等于x,只要求出∠a和∠b就能求出所求⾯积。
(1)参数方程:z=2^2^/2^2^sin y x y x ++(-8<=x<=8,-8<=y<=8) (2)程序:[X,Y]=meshgrid(-8::8);r=sqrt(x.^2+y.^2)+eps;Z=sin(r)./r;Mesh(x,y,z)Axis square(3)程序的输出结果:3:球面,椭球面,双叶双曲面,单叶双曲面1球面: (4):参数方程:⎪⎩⎪⎨⎧===ϕθϕθϕcos *sin *sin *cos *sin *R z R y R x 0π<=θ<2* 0<=ϕ<π (5)程序:u=[0:pi/60:2*pi];v=[0:pi/60:pi];[U,V]=meshgrid(u,v);R=3;X=R*sin(v).*cos(u);Y=R*sin(v).*sin(u);Z=R*cos(v);Surf(x,y,z);axis equal;(3)程序输出结果:2椭球面: (1)参数方程:⎪⎩⎪⎨⎧===ϕθϕθϕcos *sin *sin *cos *sin *c z b y a x 0<=θ<2*π 0<=ϕ<=π (2)程序:ezsurf(‘3*sin(u)*cos(v) ,’3*sin(u)*sin(v)’,’1*cos(u)’,[0,pi,0,2*pi]);(3)程序的输出结果:3单叶双曲面: (1)参数方程:⎪⎩⎪⎨⎧===ϕθϕθϕtan sin *sec *cos *sec *z a y a x 0<=θ<2*π -π/2<ϕ<π/2 (2)程序:ezsurf(‘3*sec(u)*cos(v),’3*sec(u)*sin(v)’,’5*tan(u)’,[-pi/2,pi/2,0,2*pi]);axis auto(3)输出程序结果:4双叶双曲面: (1)参数方程:⎪⎩⎪⎨⎧===ϕθϕθϕsec *sin *tan *cos *tan *c z b y a x 0<=θ<2*π -π<ϕ<3*π/2,ϕ≠π/2(2)程序:ezsurf(‘3*tan(u)*cos(v)’,’3*tan(u)*sin(v)’,’5*sec(u)’,[-pi/2,3*pi/2,0,2*pi]);axis auto(4) (3)输出程序结果:抛物螺线: (1)参数方程:⎪⎩⎪⎨⎧===2^*sin **cos **t c z t t b y t t a x 0<T<+∞ (2)程序:ezplot3(‘2*t*cos(t)’,’2*t*sin(t)’,’t.^2/3’,[0,50]);(3)输出程序结果:(5)马鞍面: (1)参数方程:z=x^2/9-y^2/4 (-25<=x<=25,-25<=y<=25)(2)程序:[X,Y]=meshgrid(-25:1:25);Z=X.^2/9-Y.^2/4;Surf(X,Y,Z)Title(‘马鞍面’)grid off(3)输出程序结果:(6)黎曼函数:(1)程序:n=100;x=[];y=[];k=1;for q=2:nfor p=1:q-1if gcd(q,p)==1 %利用函数gcd(m,n)可求m和n的最大公约数x(k)=p/q;y(k)=1/q;k=k+1;endendendplot(x,y,’.b’); axis([0,1,0,1])(2)程序输出结果:。
实验一 常微分方程1. 分别用Euler 法和ode45解下列常微分方程并与解析解比较: (1) ,(0)1,13y x y y x '=+=<<Euler 法:function [t,y]=euler(Fun,tspan,y0,h) t=tspan(1):h:tspan(2); y(1)=y0;for i=1:length(t)-1y(i+1)=y(i)+h.*feval(Fun,t(i),y(i)); end t=t'; y=y';function f=Fun(x,y) % 常微分方程的右端函数 f=x+y;>> [x,y]=euler('Fun',[0,3],1,0.1)>> [x,y] ans =0 1.0000 0.1000 1.1000 0.2000 1.2200 0.3000 1.3620 0.4000 1.5282 0.5000 1.7210 0.6000 1.9431 0.7000 2.1974 0.8000 2.4872 0.9000 2.8159 1.0000 3.1875 1.1000 3.6062 1.2000 4.0769 1.3000 4.6045 1.4000 5.1950 1.5000 5.8545 1.6000 6.5899 1.7000 7.4089 1.8000 8.3198 1.9000 9.3318 2.0000 10.4550 2.1000 11.7005 2.2000 13.0805 2.3000 14.6086 2.4000 16.2995 2.5000 18.1694 2.6000 20.2364 2.7000 22.5200 2.8000 25.0420 2.9000 27.8262 3.0000 30.8988ode45:>> [x,y]=ode45('Fun',[0,3],1) ans =0 1.0000 0.0502 1.0528 0.1005 1.1109 0.1507 1.17460.2010 1.2442 0.2760 1.3596 0.3510 1.4899 0.4260 1.63610.5010 1.7996 0.5760 1.9817 0.6510 2.1838 0.7260 2.4074实验一 常微分方程0.8010 2.6544 0.8760 2.9264 0.9510 3.2254 1.0260 3.55351.1010 3.9131 1.1760 4.3065 1.2510 4.7364 1.3260 5.20561.4010 5.7172 1.4760 6.2744 1.5510 6.8810 1.6260 7.54061.7010 8.2574 1.7760 9.0359 1.8510 9.8808 1.9260 10.79742.0010 11.7912 2.0760 12.8683 2.1510 14.0351 2.2260 15.29862.3010 16.6664 2.3760 18.1466 2.4510 19.7478 2.5260 21.47962.6010 23.3522 2.6760 25.3764 2.7510 27.5641 2.8260 29.92812.9010 32.4820 2.9257 33.3694 2.9505 34.2796 2.9752 35.21343.0000 36.1711解析解:>> y=dsolve('Dy=x+y','y(0)=1','x') y =2*exp(x) - x - 1(2) 20.01()2sin(),(0)0,(0)1,05y y y t y y t ''''-+===<< Euler 法:实验一常微分方程function f=Fun(t,y)% 常微分方程的右端函数f=[y(2);0.01*y(2)^2-2*y(1)+sin(t)];>> [t,y]=euler('Fun',[0,5],[0,1],0.2)ode45:>> [t,y]=ode45('Fun',[0,5],[0,1])t =0 0.0001 0.0001 0.0002 0.0002 0.0005 0.0007 0.0010 0.0012 0.00250.0037 0.0050 0.0062 0.0125 0.0188 0.0251 0.0313 0.0627 0.0941 0.12550.1569 0.2819 0.4069 0.5319 0.6569 0.7819 0.9069 1.0319 1.1569 1.28191.4069 1.5319 1.6569 1.7819 1.90692.0319 2.1569 2.2819 2.4069 2.53192.6569 2.7819 2.90693.0319 3.1569 3.2819 3.4069 3.5319 3.6569 3.78193.90694.0319 4.1569 4.2819 4.4069 4.5319 4.6569 4.7427 4.8285 4.91425.0000y =0 1.0000 0.0001 1.0000 0.0001 1.0000 0.0002 1.0000 0.0002 1.00000.0005 1.0000 0.0007 1.0000 0.0010 1.0000 0.0012 1.0000 0.0025 1.00000.0037 1.0000 0.0050 1.0000 0.0062 1.0000 0.0125 1.0000 0.0188 1.00000.0251 0.9999 0.0313 0.9998 0.0627 0.9987 0.0941 0.9965 0.1253 0.99340.1564 0.9893 0.2786 0.9632 0.3966 0.9220 0.5085 0.8662 0.6126 0.79670.7072 0.7146 0.7908 0.6210 0.8620 0.5176 0.9198 0.4058 0.9632 0.28760.9915 0.1647 1.0043 0.0392 1.0013 -0.0869 0.9826 -0.2117 0.9485 -0.33310.8996 -0.4490 0.8365 -0.5578 0.7605 -0.6577 0.6725 -0.7471 0.5742 -0.8246实验一 常微分方程0.4669 -0.8889 0.3525 -0.9393 0.2327 -0.9748 0.1095 -0.9950 -0.0154 -0.9996-0.1398 -0.9887 -0.2619 -0.9624 -0.3798 -0.9212 -0.4916 -0.8657 -0.5957 -0.7970-0.6904 -0.7161 -0.7742 -0.6242 -0.8460 -0.5228 -0.9046 -0.4134 -0.9491 -0.2978-0.9789 -0.1777 -0.9934 -0.0549 -0.9945 0.0300 -0.9883 0.1146 -0.9748 0.1985-0.9543 0.28092. 求一通过原点的曲线,它在(,)x y 处的切线斜率等于22,0 1.57.x y x +<<若x 上限增为1.58,1.60会发生什么?function f=Fun(x,y) % 常微分方程的右端函数 f=2*x+y.^2;>> [x,y]=ode45('Fun',[0,1.57],0) x =0 0.0393 0.0785 0.1178 0.1570 0.1963 0.2355 0.2748 0.3140 0.3533 0.3925 0.4318 0.4710 0.5103 0.5495 0.5888 0.6280 0.6673 0.7065 0.7458 0.7850 0.8243 0.8635 0.9028 0.9420 0.9813 1.0205 1.0598 1.0990 1.1383 1.1775 1.2168 1.2560 1.2953 1.3345 1.3738 1.4130 1.4248 1.4367 1.4485 1.4604 1.4722 1.4840 1.4959 1.5077 1.5140 1.5203 1.5265 1.5328 1.5376 1.5424 1.5472 1.5519 1.5543 1.5567 1.5591 1.5614 1.5631 1.5647 1.5664 1.5681 1.5685 1.5690 1.5695 1.5700 y =实验一 常微分方程0 0.0015 0.0062 0.0139 0.0247 0.0386 0.0556 0.0758 0.09920.1259 0.1559 0.1895 0.2266 0.2675 0.3124 0.3615 0.4152 0.4738 0.5378 0.6076 0.6841 0.7679 0.8601 0.9620 1.0751 1.2014 1.3434 1.5045 1.6892 1.9037 2.1557 2.4577 2.8282 3.3003 3.9056 4.7317 5.9549 6.4431 7.0116 7.6832 8.4902 9.4821 10.7170 12.3090 14.4551 15.9220 17.7080 19.9390 22.8164 25.6450 29.2282 33.9673 40.5910 44.9434 50.3088 57.1229 66.1087 74.3108 84.7123 98.4901 117.7875 124.9206 132.9699 142.1268 152.641500.20.40.60.81 1.2 1.4 1.6若x 上限增为1.58,1.60,则超出运算的范围,发生溢出。
《数学建模》实验报告
实验序号:实验3实验项目名称:Lingo编程
实验地点指导教师实验时间
一、实验目的及要求
通过对具体实例的分析,学会运用规划知识建立数学模型的方法,掌握Lingo的基本操作。
二、实验设备(环境)及要求
多媒体机房,单人单机,独立完成
三、实验内容与步骤
1. 某银行经理计划用一笔资金进行有价证券的投资,可供购进的证券以及其信用等级、到期年限、收益如下表所示。
按照规定,市政证券的收益可以免税,其他证券的收益需按50%的税率纳税。
此外还有以下限制:
(1)政府及代办机构的证券总共至少要购进400万元;
(2)所购证券的平均信用等级不超过1.4(信用等级数字越小,信用程度越高);
(3)所购证券的平均到期年限不超过5年。
(1)若该经理有1000万元资金,应如何投资?
(2)如果能够以2.75%的利率借到不超过100万元资金,该经理应如何操作?
(3)在1000万元资金情况下,若证券A的税前收益增加为4.5%,投资应否该改变?若证券C的税前收益减少为4.8%,投资应否改变?
2. 课本例2
四、实验结果与数据处理
1.
(1)设投资证劵A,B,,C,D,E的金额分别为x1,x2,x3,x4,x5(百万元)。
列出模型:
Max=0.043x1+0.027x2+0.025x3+0.022x4+0.045x5 st. x2+x3+x4≥4
x1+x2+x3+x4+x5≤10
2x1+2x2+x3+x4+5x5
≤1.4即6x1+6x2−4x3−4x4−36x5≤0 x1+x2+x3+x4+x5
9x1+15x2+14x3+3x4+2x5
≤5即4x1+10x2−x3−2x4−3x5≤10 x1+x2+x3+x4+x5
x1,x2,x3,x4,x5≥0
Model:
max=0.043*x1+0.027*x2+0.025*x3+0.022*x4+0.045*x5;
x2+x3+x4>4;
x1+x2+x3+x4+x5<10;
6*x1+6*x2-4*x3-4*x4+36*x5<0;
4*x1+10*x2-1*x3-2*x4-3*x5<0;
end
故证券A,C,E分别投资2.182百万元,7.364百万元,0.455百万元.最大收益为0.298百万元。
(2)由(1)中的影子价格可得,若资金增加100万元,收益可增加0.0298百万元. 以2.75%的利率借到100万元资金的利息为0.0275百万元,故应该借贷.此时证券A,C,E分别投资2.40百万元,8.10百万元,0.50百万元.
(3)由(1)得,在目标函数最优解不变的情况下,证券A的税前收益可增加0.35%,故若证券A的税前收益增加为4.5%,投资不应改变. 证券C的税前收益可减少,证券C的税前收益可减0.112%,故若证券C的税前收益减少为4.8%,投资应该改变.
2、
Model:
max=24*x1+16*x2+44*x3+32*x4-3*x5-3*x6;
4*x1+3*x2+4*x5+3*x6<600;
4*x1+2*x2+6*x5+4*x6<480;
x1+x5<100;
x3=0.8*x5;
x4=0.75*x6;
end
由此可知:最优解为x1=0,x2=168,x3=19.2,x4=0,x5=24,x6=0.最优值为3460.8,即每天生产销售168kg A2和19.2kg B1(不出售A1和B2),可以获得最大净利润3460.8元。
为此,需用8桶牛奶加工成A1,42桶加工成A2,并将得到的24kg A1全部加工成B1.
五、分析与讨论。