内容发布更新时间 : 2024/5/16 2:53:23星期一 下面是文章的全部内容请认真阅读。

第三章 实验研究设计

Value: 键入A OldNew: 点击Add Old Value

Range: 键入9 through 16 New Value

Value: 键入B OldNew: 点击Add Old Value

Range: 键入17 through 24 New Value

Value: 键入C OldNew: 点击Add Old Value

Range: 键入25 through 32 New Value

Value: 键入D OldNew: 点击Add Continue OK Rrandom值为1~8时，treat值为A

Rrandom值为9~16时，treat值为B

Rrandom值为17~24时，treat值为C

Rrandom值为25~32时，treat值为D

注：当样本量较大时，最好编程实现，以免除数据录入的不便。以下为SPSS的Syntax窗口中用编程来完成本题。

File→New→Syntax，打开Syntax窗口，键入如下程序：

input program.

numeric n k number group (F8.0)/random(F8.6). string treat(A1). compute n=32. compute k=4. loop number=1 to n. end case.

compute n=lag(n). compute k=lag(k). end loop. end file. end input program. compute random=uniform(1).

开始数据录入程序段

受试对象总数为32 4个处理组

结束数据录入程序段

产生范围在0~1之间的伪随机数

3-11

第三章 实验研究设计

set seed 20071222. rank variables=random .

compute group = trunc((rrandom-1)*k/n ). formats group(F3.0). compute

treat=substr(\group+1,1). list number treat.

设定随机种子为20071222 对伪随机数排序

根据伪随机数的序号进行分组

结果中显示受试对象编号及被分到的处理组

注：程序中的n(受试对象总数)、k(即处理组数)可根据实际情况赋予不同的值。

输出结果

Data View窗口(由于篇幅限制，仅列出前16例受试对象的分组情况)

图3-5 SPSS编程实现受试对象随机分配结果

Output窗口

List number

1 2

treat

D D

number

17 18

Treat

C C

3-12

第三章 实验研究设计

3 4 5 6 7 8 9 10 11 12 13 14 15 16

B C D D B C D A D B C B A A

19 20 21 22 23 24 25 26 27 28 29 30 31 32

B C B A C D C A B A A A B D

编程实现随机分配的结果见data view 窗口(图3-5)或output 窗口。可以看出32只大鼠被随机分配到A、B、C、D组。在用此程序进行随机分组前，事先规定A、B、C、D分别对应于对照组、MEL组、TXL组和MEL+TXL组。从分配结果中可以看出：10，15，16，22，26，28，29，30号大鼠被分到对照组；3，7，12，14，19，21，27，31号大鼠被分到MEL组；4，8，13，17，18，20，23，25号大鼠被分到TXL组；1，2，5，6，9，11，24，32号大鼠被分到MEL+TXL组。

3-13