TwoSampleSurvival.Equality(TrialSize)
TwoSampleSurvival.Equality()所属R语言包:TrialSize
Test for two sample equality in exponential model for survival data
测试两个样本指数模型在平等的生存数据
译者:生物统计家园网 机器人LoveR
描述----------Description----------
H0: the difference between the hazard rates of two samples is equal to
H0:两个样品之间的危险率的差是等于
Ha: not equal to 0
哈:不等于0的
The test is finding whether there is a difference between the hazard rates of the test drug and the reference drug.
该测试是寻找是否有试验药物的危险率之间的差值与参考药物。
用法----------Usage----------
TwoSampleSurvival.Equality(alpha, beta, lam1, lam2, k, ttotal, taccrual, gamma)
参数----------Arguments----------
参数:alpha
significance level
显着性水平
参数:beta
power = 1-beta
功率= 1-β
参数:lam1
the hazard rates of control group
对照组的风险率
参数:lam2
the hazard rates of a test drug
测试药物的危险率
参数:k
k=n1/n2 sample size ratio
K = N1/N2样本大小比
参数:ttotal
Total trial time
总试验时间
参数:taccrual
accrual time period
权责发生制的时间段
参数:gamma
parameter for exponential distribution. Assume Uniform patient entry if gamma =0
指数分布的参数。假设统一“耐心等待”,如果γ= 0
参考文献----------References----------
实例----------Examples----------
Example.7.2.4<-TwoSampleSurvival.Equality(0.05,0.2,1,2,1,3,1,0.00001)
Example.7.2.4
## The function is currently defined as[#功能目前被定义为]
function(alpha,beta,lam1,lam2,k,ttotal,taccrual,gamma){
variance1<-lam1^2*(1+gamma*exp(-lam1*ttotal)*(1-exp((lam1-gamma)*taccrual))/((lam1-gamma)*(1-exp(-gamma*taccrual))))^-1
variance2<-lam2^2*(1+gamma*exp(-lam2*ttotal)*(1-exp((lam2-gamma)*taccrual))/((lam2-gamma)*(1-exp(-gamma*taccrual))))^-1
print(variance1)
print(variance2)
n2=(qnorm(1-alpha/2)+qnorm(1-beta))^2*(variance1/k+variance2)/(lam1-lam2)^2
n2 }
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|