“用SPSS计算Rwg的程序”的版本间的差异
Lichaoping（讨论 | 贡献） |
Lichaoping（讨论 | 贡献） |
||
| （未显示同一用户的19个中间版本） | |||
| 第1行： | 第1行： | ||
在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 | 在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 | ||
| − | < | + | 使用说明：<b><font color="blue">将以下表格中的代码复制到SPSS的Synatx窗口，修改相应地方后，就可以直接运行，得到结果。</font></b> |
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | |||
| − | <nowiki>*******************************************************************</nowiki> | + | 大家在研究的过程中，可以直接使用。如果您愿意引用一下，更好。引用方式：<b><font color="blue"><nowiki>李超平. (2005) "用SPSS计算Rwg的程序",http://www.obhrm.net/index.php/用SPSS计算Rwg的程序</nowiki></font></b> |
| − | <nowiki>*</nowiki>读取数据文件. | + | |
| − | <nowiki>*</nowiki>需要修改的地方：文件名及其所在路径. | + | {| style=" width: 100%;margin:0px; border: solid 1px #AAAAAA; border-spacing: 5px;" |
| + | |<nowiki>*******************************************************************</nowiki> | ||
| + | <nowiki>*</nowiki>Rwg的计算程序，及其基本思路. | ||
| + | <br><nowiki>*</nowiki>第一步，先把数据合并. | ||
| + | <br><nowiki>*</nowiki>从合并文件计算每一变量的方差. | ||
| + | <br><nowiki>*</nowiki>计算每一个维度所有变量方差的平均值. | ||
| + | <br><nowiki>*</nowiki>计算每一个维度的Rwg. | ||
| + | <br><nowiki>*</nowiki>注意：每一个维度需要一段下面的代码. | ||
| + | |||
| + | <br><nowiki>*******************************************************************</nowiki> | ||
| + | <br><nowiki>*</nowiki>读取数据文件. | ||
| + | <br><nowiki>*</nowiki>需要修改的地方：文件名及其所在路径. | ||
GET FILE=’D:\RUC Files\test.sav’. | GET FILE=’D:\RUC Files\test.sav’. | ||
| − | <nowiki>*******************************************************************</nowiki> | + | <br><nowiki>*******************************************************************</nowiki> |
| − | <nowiki>*</nowiki>根据数据文件中的分组变量对数据进行分组. | + | <br><nowiki>*</nowiki>根据数据文件中的分组变量对数据进行分组. |
| − | <nowiki>*</nowiki>需要修改的地方1：分组变量名称，请将code修改为分组变量. | + | <br><nowiki>*</nowiki>需要修改的地方1：分组变量名称，请将code修改为分组变量. |
| − | <nowiki>*</nowiki>需要修改的地方2：每一维度所包括的变量的名称，请将item1,item2,item3,item3……修改为您研究中该维度所包括的变量的名称. | + | <br><nowiki>*</nowiki>需要修改的地方2：每一维度所包括的变量的名称，请将item1,item2,item3,item3……修改为您研究中该维度所包括的变量的名称. |
| − | <nowiki>*</nowiki>需要修改的地方3：每一组所包括的样本大小变量，请将case_num修改为您所希望的名称. | + | <br><nowiki>*</nowiki>需要修改的地方3：每一组所包括的样本大小变量，请将case_num修改为您所希望的名称. |
AGGREGATE | AGGREGATE | ||
/OUTFILE=’D:\RUC Files\Rwg_aggr.sav’ | /OUTFILE=’D:\RUC Files\Rwg_aggr.sav’ | ||
| + | |||
/BREAK=code | /BREAK=code | ||
| + | |||
/item1 = SD(item1) | /item1 = SD(item1) | ||
| + | |||
/item2 = SD(item2) | /item2 = SD(item2) | ||
| + | |||
/item3 = SD(item3) | /item3 = SD(item3) | ||
| + | |||
/item4 = SD(item4) | /item4 = SD(item4) | ||
| + | |||
/item5 = SD(item5) | /item5 = SD(item5) | ||
| + | |||
/item6 = SD(item6) | /item6 = SD(item6) | ||
| + | |||
/case_num=N. | /case_num=N. | ||
GET FILE=’D:\RUC Files\Rwg_aggr.sav’. | GET FILE=’D:\RUC Files\Rwg_aggr.sav’. | ||
| − | <nowiki>*******************************************************************</nowiki> | + | <br><nowiki>*******************************************************************</nowiki> |
| − | <nowiki>*</nowiki>计算每一个变量的方差，即标准差的平方. | + | <br><nowiki>*</nowiki>计算每一个变量的方差，即标准差的平方. |
| − | <nowiki>*</nowiki>需要修改的地方1：请根据维度所包括的变量的名称进行相应的修改. | + | <br><nowiki>*</nowiki>需要修改的地方1：请根据维度所包括的变量的名称进行相应的修改. |
COMPUTE item1 = item1*item1 . | COMPUTE item1 = item1*item1 . | ||
| + | |||
COMPUTE item2 = item2*item2 . | COMPUTE item2 = item2*item2 . | ||
| + | |||
COMPUTE item3 = item3*item3 . | COMPUTE item3 = item3*item3 . | ||
| + | |||
COMPUTE item4 = item4*item4 . | COMPUTE item4 = item4*item4 . | ||
| + | |||
COMPUTE item5 = item5*item5 . | COMPUTE item5 = item5*item5 . | ||
| + | |||
COMPUTE item6 = item6*item6 . | COMPUTE item6 = item6*item6 . | ||
| + | |||
EXECUTE . | EXECUTE . | ||
compute abcd=mean(item1,item2,item3,item4,item5,item6). | compute abcd=mean(item1,item2,item3,item4,item5,item6). | ||
| + | |||
execute. | execute. | ||
| − | <nowiki>*******************************************************************</nowiki> | + | <br><nowiki>*******************************************************************</nowiki> |
| − | <nowiki>*</nowiki>为计算Rwg准备. | + | <br><nowiki>*</nowiki>为计算Rwg准备. |
| − | + | <br><nowiki>*</nowiki>请先确定您所采用的评价问卷。如果是5分等级量表，则scale=5；如果是7分等级量表,则scale=7……. | |
| − | <nowiki>*</nowiki>请确定该维度所包括的题目数目，并将dim_num后面的数字修改为题目数目. | + | <br><nowiki>*</nowiki>请确定该维度所包括的题目数目，并将dim_num后面的数字修改为题目数目. |
| − | <nowiki>*</nowiki>请将Rwg_item修改为保存该维度Rwg值的变量名称. | + | <br><nowiki>*</nowiki>请将Rwg_item修改为保存该维度Rwg值的变量名称. |
compute scale=5. | compute scale=5. | ||
| + | |||
compute dim_num=6. | compute dim_num=6. | ||
| + | |||
compute s2=abcd. | compute s2=abcd. | ||
| + | |||
execute. | execute. | ||
| − | <nowiki>*******************************************************************</nowiki> | + | <br><nowiki>*******************************************************************</nowiki> |
| − | <nowiki>*</nowiki>计算Rwg，这部分不需要修改. | + | <br><nowiki>*</nowiki>计算Rwg，这部分不需要修改. |
compute Qeq=(scale*scale-1)/12. | compute Qeq=(scale*scale-1)/12. | ||
| + | |||
execute. | execute. | ||
compute Rwg_item=(dim_num*(1-(s2/Qeq)))/(dim_num*(1-(s2/Qeq))+(s2/Qeq)). | compute Rwg_item=(dim_num*(1-(s2/Qeq)))/(dim_num*(1-(s2/Qeq))+(s2/Qeq)). | ||
| + | |||
execute. | execute. | ||
| − | <nowiki>*******************************************************************</nowiki> | + | <br><nowiki>*******************************************************************</nowiki> |
| − | <nowiki>*</nowiki>需要修改的地方：文件名及其所在路径（用来保存最终的Rwg的文件）. | + | <br><nowiki>*</nowiki>需要修改的地方：文件名及其所在路径（用来保存最终的Rwg的文件）. |
SAVE OUTFILE=’D:\RUC Files\aa.sav’ | SAVE OUTFILE=’D:\RUC Files\aa.sav’ | ||
| + | |||
/DROP=abcd scale dim_num s2 Qeq /COMPRESSED. | /DROP=abcd scale dim_num s2 Qeq /COMPRESSED. | ||
GET FILE=’D:\RUC Files\aa.sav’. | GET FILE=’D:\RUC Files\aa.sav’. | ||
| + | |} | ||
2017年2月28日 (二) 07:48的最新版本
在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
使用说明：将以下表格中的代码复制到SPSS的Synatx窗口，修改相应地方后，就可以直接运行，得到结果。
大家在研究的过程中，可以直接使用。如果您愿意引用一下，更好。引用方式：李超平. (2005) "用SPSS计算Rwg的程序",http://www.obhrm.net/index.php/用SPSS计算Rwg的程序
| *******************************************************************
*Rwg的计算程序，及其基本思路.
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’. |
