嗯,这个package就是aaaaahomework 因为作者被心统作业折磨的够呛。。。所以就简单地编出了这个包
install_github("notplayingcute/aaaaahomework")
首先是两个总体都是正态分布且两个总体方差已知
norDoublemksigk(x1,x2,sigma1,sigma2,n1,n2)
返回值是Z
norDoublemksigk_logic(x1,x2,sigma1,sigma2,n1,n2,a(default = 0.05),right(default = FALSE),left(Default = FALSE))
这个可以直接给出是否拒绝h0,right和left是单侧检验才要,a只有0.05和0.01可选(只有这一个可以选),不是0.05就是0.01 说个例题见《现代心理与教育统计学》P236 直接说数字X1=114,sigma1=5,n1=30,X2=112.5,sigma2=6.5,n2=27 书上答案是Z=0.96
两个总体都是正态分布且两个总体方差齐次
norDoubleimkqsigun(x1,x2,s1,s2,n1,n2)
返回值是z,对应有一个logic函数,操作说明同上(因为作者的懒惰不想做了,所以接下来所有a都是0.05,无论怎么改都一样。。。对了左右区间也选不了,不过未来的更新会加入的,请大家放心)
norDoubleimkqsigun(x1,x2,s1,s2,n1,n2,a(default = 0.05),right(default = FALSE),left(Default = FALSE))
再说个P238的例题直接写数了x1=80,n1=60,s1=18,x2=73,n2=52,s2=15;书上答案t=2.19
同理还有一个非齐次的
norDoubleimkfqsigun(x1,x2,s1,s2,n1,n2)
norDoubleimkfqsigun(x1,x2,s1,s2,n1,n2,a(default = 0.05),right(default = FALSE),left(Default = FALSE))
相关系数已知
norDoublermksigun_logic(x1,x2,s1,s2,n,r,a(default = 0.05),right(default = FALSE),left(Default = FALSE))
norDoublermksigun(x1,x2,s1,s2,n,r)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.