数学建模实 验 报 告2

  • 格式:doc
  • 大小:475.00 KB
  • 文档页数:10

数据的统计分析一维、二维插值;各种回归模型的MATLAB求解及显著性检验方法;求y关于x的线性回归方程,检验回归效果是否显著?> clear all;x=[20 25 30 35 40 45 50 55 60 65]';X=[ones(10,1) x];Y=[13.1 15.1 16.4 17.1 17.9 18.7 19.6 21.2 22.5 24.3]';[b,bint,r,rint,stats]=regress(Y,X);b,bint,statsb = 9.06480.2241bint =7.9405 10.18920.1991 0.2492stats =0.9815 425.2505 0.0000>>因为R^2=0.9815,接近1,所以回归效果显著线性回归方程为y=0.2241x+ 9.06482、全国人均消费金额记作y(元);人均国民收入记为x(元),求y关于x的线性回归方程,检验回归效果是否显著?>> clear all;x=[461 489 525 580 692 853 956 1104 1355 1512 1634 1879 2287 2939 3923 4854 5576 6053 6392]';X=[ones(19,1) x];Y=[234.75 259.26 280.58 305.97 347.15 433.53 481.36 545.4 687.51 756.27 797.08 890.66 1063.39 1323.22 1736.32 2224.59 2627.06 2819.36 2958.18]';[b,bint,r,rint,stats]=regress(Y,X);b,bint,statsb = 37.39110.4553bint = 13.6661 61.11610.4475 0.4631stats = 1.0e+004 *0.0001 1.5195 0>>因为R^2=1.0e+004 *,接近1,所以回归效果显著线性回归方程为y=0.4553x+37.39113、电影院调查广告费用和报纸广告费用对每周收入的影响,得到下面的数据,建立回归模>> clear all;y=[96 90 95 92 95 95 94 94]';x1=[1.5 2 1.5 2.5 3.3 2.3 4.2 2.5]';x2=[5 2 4 2.5 3 3.5 2.5 3]';x=[x1 x2];[b,bint,r,rint,stats]=regress(y,x);b,bint,statsfigure(1)rcoplot(r,rint)b = 15.659316.7480bint = 6.6446 24.67409.6228 23.8733stats = 54.8647 7.6485 0.0326>>有异常点。

>> y=[96 95 92 95 95 94 94]';x1=[1.5 1.5 2.5 3.3 2.3 4.2 2.5]';x2=[5 4 2.5 3 3.5 2.5 3]';x=[x1 x2];[b,bint,r,rint,stats]=regress(y,x);b,bint,statsfigure(2)rcoplot(r,rint)rstool(x,y,'purequadratic')b = 14.434616.9611bint =7.7094 21.159811.7224 22.1999stats =58.9714 6.0759 0.0569>> beta,rmsebeta = 72.39592.06748.0808-0.1337-0.7842rmse = 0.1158>>回归模型y=72.3959+2.0674x1+ 8.0808x2 -0.1337x12 -0.7842x224、某零件上有一段曲线,为了在程序控制机床上加工这一零件,需要这段曲线的解析表达式,在曲线横坐标xi 处测得纵坐标yi,共11对数据如下:求这段曲线的纵坐标y关于横坐标x的二次多项式回归方程。

>> clear all;t=0:2:20;s=[0.6 2 4.4 7.5 11.8 17.1 23.3 31.2 29.6 49.7 61.7];T=[ones(11,1) t' (t.^2)'];[b,bint,r,rint,stats]=regress(s',T);b,statsb = 1.63990.00250.1432stats =0.9766 166.6287 0.0000>>回归方程y=1.6399+0.0025x+0.1432x^25、某大型牙膏制造企业为了更好的拓展产品市场,有效地管理库存,公司董事会要求销售部门根据市场调查,找出公司生产的牙膏销售量与销售价格、广告投入等之间的关系,从而预测出在不同价格和广告费用下的销售量。

为此,销售部门的研究人员收集了过去30个销售周期(每个销售周期为4周)公司生产的牙膏的销售量、销售价格、投入的广告费用,以及同期其他厂家生产的同类牙膏的市场平均销售价格,见下表,试根据这些数据建立一个数学模型,分析牙膏销售量与其它因素的关系,为制定价格策略和广告投入策略提供数据依据。

牙膏销售量与销售价格、广告费用等数据(1)画出牙膏销售量与公司销售价格之差的散点图;(2)验证牙膏销售量与公司销售价格之差是否具有线性关系?若有回归效果是否显著?>> clear all;x=[-0.05 0.25 0.6 0 0.25 0.2 0.15 0.05 -0.15 0.15 0.2 0.1 0.4 0.45 0.35 0.3 0.5 0.5 0.4 -0.05 -0.05 -0.1 0.2 0.1 0.5 0.6 -0.05 0 0.05 0.05]';X=[ones(30,1) x];Y=[7.38 8.51 9.52 7.5 9.33 8.28 8.75 7.87 7.1 8 7.89 8.15 9.1 8.86 8.9 8.87 9.26 9 8.75 7.95 7.65 7.27 8 8.5 8.75 9.21 8.27 7.67 7.93 9.26]';[b,bint,r,rint,stats]=regress(Y,X);b,bint,statshold onplot(x,Y,'ro',x,Y,'w')b = 7.88452.5332bint = 7.6831 8.08581.8446 3.2218stats = 0.6697 56.7809 0.0000>>牙膏销售量与公司销售价格之差具有线性关系,R^2=0.6697,回归效果是不显著6、下表是气象学家测量得到的气象资料,它们分别表示南半球地区按不同纬度、不同月份的平均气旋数字。

根据这些数字绘制出气旋分布曲面的图形。

x=0:10:80;y=1:12;[x1,y1]=meshgrid(x,y);z=[2.4 18.7 20.8 22.1 37.3 48.2 25.6 5.3 0.3;...1.6 21.4 18.5 20.1 28.8 36.6 24.2 5.3 0;...2.4 16.2 18.2 20.5 27.8 35.5 25.5 5.4 0;...3.2 9.2 16.6 25.1 37.2 40 24.6 4.9 0.3;...1.02.8 12.9 29.2 40.3 37.6 21.1 4.9 0.3;...0.5 1.7 10.1 32.6 41.7 35.4 22.2 7.1 0;...0.4 1.4 8.3 33.0 46.2 35 20.2 5.3 0.1;...0.2 2.4 11.2 31.0 39.9 34.7 21.2 7.3 0.2;...0.5 5.8 12.5 28.6 35.9 35.7 22.6 7 0.3;...0.8 9.2 21.1 32.0 40.3 39.5 28.5 8.6 0;...2.4 10.3 23.9 28.1 38.2 40 25.3 6.3 0.1;...3.6 16 25.5 25.6 43.4 41.9 24.3 6.6 0.3];figure(1);meshz(x1,y1,z)xlabel('X'),ylabel('Y'),zlabel('Z')7、在1-12的11小时内,每隔1小时测量一次温度,测得的温度依次为:5,8,9,15,25,29,31,30,22,25,27,24。

试估计每隔1/10小时的温度值。

>> hours=1:12;temps=[5 8 9 15 25 29 31 30 22 25 27 24];h=1:0.1:12;t=interp1(hours,temps,h,'spline'); % (直接输出数据将是很多的)plot(hours,temps,'+',h,t,hours,temps,'r:') %作图xlabel('Hour'),ylabel('Degrees Celsius')>>8、测得平板表面3*5网格点处的温度分别为:82 81 80 82 8479 63 61 65 818484 82 85 86以平滑数据,在x、y方向上每隔0.2个单位的地方进行插值,然后做出平板表面的温度分布曲面z=f(x,y)的图形。

>> x=1:5;y=1:3;temps=[82 81 80 82 84;79 63 61 65 81;84 84 82 85 86];mesh(x,y,temps)pausexi=1:0.2:5;yi=1:0.2:3;zi=interp2(x,y,temps,xi',yi,'cubic');figure(2)mesh(xi,yi,zi)936行数据,其他的略clear all;x=[74 1373 1321 0 1049 1647 2883 2383 2708 2933 4233 4043 2427 3526 5062 4777 5868 65345481 4592 2486 3299 3573 4741 5375 5635 5394 5291 47424948 5567 7004 7304 7048 8180 9328];y=[781 731 1791 1787 2127 2728 3617 3692 2295 1767 895 1895 3971 4357 4339 4897 49045641 6004 4603 5999 6018 6213 6434 8643 7965 8631 73497293 7293 6782 6226 5230 4600 4496 4311];z=[5 11 28 4 12 6 15 7 22 7 6 14 2 7 5 8 16 6 0 6 2 4 5 5 15 29 12 10 9 6 7 11 10 24 15 24];cx=0:10:10000;cy=0:10:10000;cz=griddata(x,y,z,cx,cy','cubic');meshz(cx,cy,cz),rotate3dxlabel('X'),ylabel('Y'),zlabel('Z')%figure(1);%mesh(x,y,z)%xi=x;%yi=y;%yi=%zi=interp(x,y,z,xi',yi,'nearest');%xlabel('X'),ylabel('Y'),zlabel('Z')10、在某山区测得一些地点的高程如下表。