“用SPSS计算Rwg的程序”的版本间的差异
Lichaoping(讨论 | 贡献) |
Lichaoping(讨论 | 贡献) |
||
第2行: | 第2行: | ||
{| style=" width: 100%;margin:0px; border: solid 1px #AAAAAA; border-spacing: 5px;" | {| style=" width: 100%;margin:0px; border: solid 1px #AAAAAA; border-spacing: 5px;" | ||
− | | | + | |<nowiki>*******************************************************************</nowiki> |
− | |||
<br><nowiki>*</nowiki>Rwg的计算程序,及其基本思路. | <br><nowiki>*</nowiki>Rwg的计算程序,及其基本思路. | ||
<br><nowiki>*</nowiki>第一步,先把数据合并. | <br><nowiki>*</nowiki>第一步,先把数据合并. |
2017年2月28日 (二) 07:36的版本
在OB/HRM的研究中,经常需要计算Rwg,而SPSS并没有提供现成的函数来计算Rwg。根据James等的计算公式,我编写了一个计算Rwg的SPSS程序,大家可以参考使用。James L R, Demaree R G, Wolf G. Rwg: An Assessment of within-Group Interrater Agreement. Journal of Applied Psychology, 1993, 78: 306-309
*******************************************************************
GET FILE=’D:\RUC Files\test.sav’.
AGGREGATE /OUTFILE=’D:\RUC Files\Rwg_aggr.sav’ /BREAK=code /item1 = SD(item1) /item2 = SD(item2) /item3 = SD(item3) /item4 = SD(item4) /item5 = SD(item5) /item6 = SD(item6) /case_num=N. GET FILE=’D:\RUC Files\Rwg_aggr.sav’.
COMPUTE item1 = item1*item1 . COMPUTE item2 = item2*item2 . COMPUTE item3 = item3*item3 . COMPUTE item4 = item4*item4 . COMPUTE item5 = item5*item5 . COMPUTE item6 = item6*item6 . EXECUTE . compute abcd=mean(item1,item2,item3,item4,item5,item6). execute.
compute scale=5. compute dim_num=6. compute s2=abcd. execute.
compute Qeq=(scale*scale-1)/12. execute. compute Rwg_item=(dim_num*(1-(s2/Qeq)))/(dim_num*(1-(s2/Qeq))+(s2/Qeq)). execute.
SAVE OUTFILE=’D:\RUC Files\aa.sav’ /DROP=abcd scale dim_num s2 Qeq /COMPRESSED. GET FILE=’D:\RUC Files\aa.sav’.
|