Fisher Z 值中的r.con函数

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

1. library('psych')
   
2. cors <- seq(-.9,.9,.1)
   
3. zs <- fisherz(cors)
   
4. rs <- fisherz2r(zs)
   
5. round(zs,2)
   
6. n <- 30
   
7. r <- seq(0,.9,.1)
   
8. rc <- matrix(r.con(r,n),ncol=2)
   
9. t <- r*sqrt(n-2)/sqrt(1-r^2)
   
10. p <- (1-pt(t,n-2))/2
    
11. r.rc <- data.frame(r=r,z=fisherz(r),lower=rc[,1],upper=rc[,2],t=t,p=p)
    
12. round(r.rc,2)
    
13. 
    
14. 
    
15. 
    
16. library('psych')
    
17. n <- 30
    
18. r <- seq(0,.9,.1)
    
19. rc <- matrix(r.con(r,n),ncol=2)
    
20. test <- r.test(n,r)
    
21. r.rc <- data.frame(r=r,z=fisherz(r),lower=rc[,1],upper=rc[,2],t=test$t,p=test$p)
    
22. round(r.rc,2)
    
23. r.test(50,r)
    
24. r.test(30,.4,.6) #test the difference between two independent correlations
    
25. r.test(103,.4,.5,.1) #Steiger case A of dependent correlations
    
26. r.test(n=103, r12=.4, r13=.5,r23=.1)
    
27. #for complicated tests, it is probably better to specify correlations by name
    
28. r.test(n=103,r12=.5,r34=.6,r13=.7,r23=.5,r14=.5,r24=.8) #steiger Case B

复制代码

其中，函数r.con(r,n)是什么意思？
还有，r.test()函数也不太清楚，哪位大神解释一下？

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：Fisher Fish con fis SHE library

官方的解释是这样的：
r.test ：Tests the significance of a single correlation, the difference between two independent correlations, the difference between two dependent correlations sharing one variable (Williams's Test), or the difference between two dependent correlations with different variables (Steiger Tests)
这样可以知道，这里的r.con——
(r.con)：lower and upper p confidence intervals