北京工业大学数学建模工程数学实验.docxVIP

下载本文档

5
0
约4.58千字
约 8页
2019-08-02 发布于江西
举报
版权申诉

北京工业大学数学建模工程数学实验.docx

1、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。。
2、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击这里二次下载。
3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
4、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
5、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
6、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
7、VIP文档为合作方或网友上传，每下载1次，网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档

输入程序：X-c(1067,919,1196,785,1126,936,918,1156,920,948) t.test(X,al=g) 结果为：One?Sample?t-test? data:??X t?=?23.9693,?df?=?9,?p-value?=?9.148e-10 alternative?hypothesis:?true?mean?is?greater?than?0 95?percent?confidence?interval:?? 920.8443??????Inf?? sample?estimates:? mean?of?x?? 997.1? 有结果可知95%的灯泡至少可以使用920.8小时。当使用时间至少为1000小时：查阅标准正态分布表可以得出对应的概率为1-Ф（(1000-μ)/δ）=1-Ф（(1000-997.1)/124.797）=1-Ф（0.02324）=1-0.5106=0.4894 即由题可以得出使用时间在1000小时以上的概率为48.94%。设原假设为H0:225，?对立假设H1:225 输入程序：? X-c(220,188,162,230,145,160,238,188,247,113,??????126,245,164,231,256,183,190,158,224,175) ?t.test(X,mu=225)? 结果：? One?Sample?t-test ?data:??X?? t?=?-3.4783,?df?=?19,?p-value?=?0.002516? alternative?hypothesis:?true?mean?is?not?equal?to?225?? 95?percent?confidence?interval:?? 172.3827?211.9173? ?sample?estimates:? mean?of?x????? 192.15? 结果得出： P-=0.0025160.05，所以拒绝H0，置信区间为[172.3827,211.9173]，最大值小于225。因此可以认为油漆作业对人体血小板计数有影响。（1）两总体方差相同时：? 设原假设H0:21，对立假设H1:21 输入程序：? X-c(113,120,138,120,100,118,138,123)? Y-c(138,116,125,136,110,132,130,110) t.test(X,?Y,?var.equal=TRUE)? 结果：? Two?Sample?t-test? data:??X?and?Y?? t?=?-0.566,?df?=?14,?p-value?=?0.5804? alternative?hypothesis:?true?difference?in?means?is?not?equal?to?0?? 95?percent?confidence?interval:?? -16.164884???9.414884??? sample?estimates:? mean?of?x?mean?of?y???? 121.250???124.625? P-值=0.580.05，接受原假设H0，所以两种方法治疗后的患者血红蛋白有差异。（2）当两组疗法的方差未知时; 建立如下的模型：可以得出对应的R程序分析补充铁剂疗法： x-c(113,120,138,120,100,118,138,123) y-c(138,116,125,136,110,132,130,110) var.test(x,y) F test to compare two variances data: x and y F = 1.2278, num df = 7, denom df = 7, p-value = 0.7935 alternative hypothesis: true ratio of variances is not equal to 1 95 percent confidence interval: 0.2458103 6.1327511 sample estimates: ratio of variances 1.2278 程序运行结果表明，饮食疗法与补充铁剂疗法的方差比置信度为0.95的置信区间为[0.2458103，6.1327511]；因为1在置信区间内，故认为实验组与对照组的方差是相同的。（3）成对数据模型? 调用函数interval_estimate? 输入程序：? X-c(113,120,138,120,100,118,138,123) Y-c(138,116,125,136,110,132,130,110) ?结果：?