8.7 某种电子元件的寿命x(单位:小时)服从正态分布。现测得16只元件的寿命如下
是否有理由认为元件的平均寿命显著地大于225小时(a=0.05)?
data = read.csv("习题8.7.csv")
t.test(data$寿命,mu = 225,alternative = "greater")
p值小于0.05,不能认为认为元件的平均寿命显著地大于225小时
8.10 装配一个部件可以采用不同的方法,所关心的问题是哪一个方法的效率更高。劳动效率可以用平均装配时间来反映。现从不同的装配方法中各抽取12件产品,记录各自的装配时间(单位:分钟)如下
两总体为正态总体,且方差相同,问这两种方法的装配时间有无显著差别(0.05)?
data = read.csv("习题8.10.csv")
t.test(data$甲法,data$乙法)
p值等于0.01516,小于0.05,两种方法的装配时间有显著差别。
8.11 调查了339名50岁以上的人,在205名吸烟者中有43个患慢性气管炎,在134名不吸烟者中有13人患慢性气管炎。调