首页 理论教育应用R实验:淋巴细胞白血病人生存数据Logistic模型

应用R实验:淋巴细胞白血病人生存数据Logistic模型

【摘要】:50名急性淋巴细胞白血病病人,在入院治疗时取得了外猿血中的细胞数x1(千个/mm3),淋巴结浸润等级x2(分为0,1,2,3级),出院后有无巩固治疗x3(1表示有巩固治疗,0 表示无巩固治疗).通过随访取得病人的生存时间,并用变量y=0表示生存1年以内,y=1表示生存1年或1年以上.关于x1,x2,x3 和y 的观测数据,见表5-1.试用Logistic回归模型分析病人生存时间长短的概率与x1,x

50名急性淋巴细胞白血病病人,在入院治疗时取得了外猿血中的细胞数x1(千个/mm3),淋巴结浸润等级x2(分为0,1,2,3级),出院后有无巩固治疗x3(1表示有巩固治疗,0 表示无巩固治疗).通过随访取得病人的生存时间,并用变量y=0表示生存1年以内,y=1表示生存1年或1年以上.关于x1,x2,x3 和y 的观测数据,见表5-1.试用Logistic回归模型分析病人生存时间长短的概率与x1,x2,x3 的关系.

表5-1 50名急性淋巴细胞白血病人生存数据

(续表)

以下用Logistic回归模型分析病人生存时间长短的概率与x1,x2,x3 的关系,其代码如下:

结果如下:

从以上结果可以看到,用三个变量x1,x2,x3 进行回归是无法通过检验的.

以下用“step( )”函数对变量进行筛选.代码如下:

>glm.new<-step(glm.sol)

结果如下:(www.chuimin.cn)

用“summary( )”函数显示细节,代码如下:

>summary(glm.new)

结果如下:

从以上计算结果可以看出,去掉了x1 后,所有参数通过了检验(显著性水平为0.1时).于是回归方程

进行预测:

以上结果说明,巩固治疗比没有巩固治疗提高了0.4325522/0.04496518=9.619715倍.