数据与总体假设同 例 8.2.3 涤纶纤度方差是否正常的检验 (卡方检验), 但 未知. 试问这一天生产的涤纶的纤度的方差是否正常 (取显著性水平 ).

依题意,这是一个单个正态总体方差的假设检验问题,其中 未知.

按题目的要求, 提出

表 8.2 单个正态总体方差的假设检验的拒绝域

单个正态总体方差 的假设检验的拒绝域 (显著性水平为 )

序号 已知 未知
I
II
III同 II同 II
IV
V同 IV同 IV
Link to original
的第一行, 选取统计量为

分布表或用 软件计算得 .

经计算

由于 ,所以拒绝 ,即在显著性水平 下, 这一天生产的涤纶的纤度的方差不正常.

代码

另外,请读者执行如下 程序,看有什么结果.


x<-c(1.32,1.55,1.36,1.40,1.44)

sigma0<-0.048

alpha<-0.05

z<-sum((x-mean(x))^2)/sigma0^2

list(x2=z, chi.value=c(qchisq(alpha/2, length(x)-1),

qchisq(1-alpha/2, length(x)-1)))