gLRT
function conducts four $k$(>=2)-sample tests for interval-censored survival data. Four of them are different nonparametric generalized logrank tests, and the other is a score test under a proportional hazards model. They are two-sided tests. The null hypothesis is that all $k$ survival functions of the failure time are identical, and the alternative hypothesis hypothesis is that not all survival functions are the same. This function calls one of functions (gLRT1
, gLRT2
, gLRT3
, gLRT4
, ScoreTest
) based on the method specified. However, each of these tests can be called individually to perform a test. Note that gLRT2
and gLRT4
do not allow exact observations. gLRT4
only allows $k = 2$ and is no longer called ScoreTest
as in Zhao (2012).
gLRT(A, k = 2, method = c("glrt1", "glrt2", "glrt3", "glrt4", "score"),
M = 50, rho = 0, gamma = 0, EMstep = TRUE, ICMstep = TRUE, tol = 1e-06,
maxiter = 1000, inf = Inf)
L
, R
] in columns 1 & 2 and treatmentment indicator ranging from 0 to $k-1$ in column 3. gLRT1
. The default is 50. u
(NA for gLRT4
)gLRT4
) statisticExact observations are not allowed in gLRT2
. If no exactly observations exist, gLRT3
reduces to gLRT2
in terms of chi-square statistic and p-value.
When method="glrt1"
is selected, gLRT1
is called to perform the test proposed by Zhao and Sun (2004). When method="glrt2"
is selected, gLRT2
is called to perform the test proposed by Sun, Zhao, and Zhao (2005). When method="glrt3"
is selected, gLRT3
is called to perform the test proposed by Zhao, Zhao, Sun, and Kim (2008). When method="score"
is selected, ScoreTest
is called to perform a score test under a proportional hazards model proposed by Finkelstein (1986). For the above methods, the NPMLE of the common distribution function under the null hypothesis is computed by function ModifiedEMICM
. When method="glrt4"
is selected, gLRT4
is called to perform the test proposed by Zhao, Duan, Zhao, and Sun (2013) where ModifiedEMICM
is applied to each of the two groups.
The link function used in gLRT2
, gLRT3
, and gLRT4
is $\xi(x) = x log(x) x^\rho (1 - x)^\gamma. $
J. Sun, Q. Zhao, and X. Zhao (2005), "Generalized Log-rank Test for Interval-Censored Data", Scandinavian Journal of Statistics, 32: 45-57.
X. Zhao, Q. Zhao, J. Sun, Q. and J. S. Kim (2008), "Generalized Log-rank Tests for Partly Interval-Censored Failure Time Data", Biometrical Journal, 50 (3): 375-385.
X. Zhao, R. Duan, Q. Zhao, and J. Sun (2013), "A New Class of Generalized Log Rank Tests for Interval-censored Failure Time Data", Computational Statistics and Data Analysis. 60: 123-131.
Finkelstein, DM (1986), "A Proportional Hazards Model for Interval-censored Failure Time Data", Biometrics, 42: 845-854.
Q. Zhao (2012), "gLRT - A New R Package for Analyzing Interval-censored Survival Data", Interval-Censored Time-to-Event Data: Methods and Applications, CRC Press, 377-396.
gLRT1
, gLRT2
, gLRT3
, gLRT4
, ScoreTest
data(cosmesis)
gLRT(cosmesis, method="glrt1", M=20, inf=100)
gLRT(cosmesis, method="glrt2", rho=1, inf=100)
data(diabetes)
gLRT(diabetes, method="glrt3", gamma=1)
gLRT(diabetes, method="score")
data(cmv)
cmvBlood = cmv[,c(2,3,6)]
cmvUrine = cmv[, 4:6]
gLRT(cmvBlood, method="glrt4")
gLRT(cmvUrine, method="glrt4", rho=1, gamma=1)
# 3-sample test
data(cosmesis)
cosmesis[80:94, 3] = 2
gLRT(cosmesis, k=3, method="glrt3", rho=0, gamma=0, inf=100)
Run the code above in your browser using DataLab