问题描述
我有超过 338 列,每列都有不同的药物名称。我想要做的是使用代码遍历所有列。此代码适用于一种特定药物。问题是我有 338 个不同的药物名称。代码是:
NPTESTS
/INDEPENDENT TEST (PLIN3 CYFIP2 IL2RA HSD3B1 IL2RB PYROXD1 Zbed4 MCTP1 LAMA3 CTSC EDEM1 LIF PIM3
PPara SLC6A11 THNSL2 ZNF697) GROUP (drug_1) MANN_WHITNEY KRUSKAL_WALLIS(COMPARE=PAIRWISE)
/MISSING ScopE=ANALYSIS USERMISSING=EXCLUDE
/CRITERIA ALPHA=0.05 CILEVEL=95
有什么方法可以循环遍历列并执行测试,而无需一遍又一遍地运行代码块?
解决方法
您可以尝试将文件重组为长格式,以便所有药物都在一个列中,然后您可以通过拆分文件同时对所有药物进行测试:
varstocases /make drugval from drug_1 to drug_338/index=drugname(drugval).
sort cases by drugname.
split file by drugname.
*now your code .
NPTESTS
/INDEPENDENT TEST (PLIN3 CYFIP2 IL2RA HSD3B1 IL2RB PYROXD1 ZBED4 MCTP1 LAMA3 CTSC EDEM1 LIF PIM3
PPARA SLC6A11 THNSL2 ZNF697) GROUP (drugval) MANN_WHITNEY KRUSKAL_WALLIS(COMPARE=PAIRWISE)
/MISSING SCOPE=ANALYSIS USERMISSING=EXCLUDE
/CRITERIA ALPHA=0.05 CILEVEL=95.
split file off.
或者,您可以使用 SPSS 宏遍历所有药物并一一测试:
define testdrugs ()
!do !drg=1 !to 338
NPTESTS
/INDEPENDENT TEST (PLIN3 CYFIP2 IL2RA HSD3B1 IL2RB PYROXD1 ZBED4 MCTP1 LAMA3 CTSC EDEM1 LIF PIM3
PPARA SLC6A11 THNSL2 ZNF697) GROUP !concat("(drug_",!drg,")") MANN_WHITNEY KRUSKAL_WALLIS(COMPARE=PAIRWISE)
/MISSING SCOPE=ANALYSIS USERMISSING=EXCLUDE
/CRITERIA ALPHA=0.05 CILEVEL=95
!doend
!enddefine.
* the macro is defined,now we can call it.
testdrugs .