View source: R/empSignificant.R
empSignificant | R Documentation |
This function computes four types of empirical significance — PFS, OS, at-least (significant in at least one of PFS/OS), and joint (significant in both PFS and OS) — using the log-rank test. Empirical significance is calculated as the proportion of significant results in simulated trials, each ending when a set number of PFS/OS events occur. Critical values for PFS and OS test significance must be specified. If trials simulate equal transition hazards across groups (H0), empirical significance estimates type I error; if they simulate differing transition hazards (H1), it estimates power.
empSignificant(simTrials, criticalPFS, criticalOS, eventNumPFS, eventNumOS)
simTrials |
( |
criticalPFS |
(positive |
criticalOS |
(positive |
eventNumPFS |
( |
eventNumOS |
( |
This returns values of four measures of empirical significance.
transition1 <- exponential_transition(h01 = 0.06, h02 = 0.3, h12 = 0.3)
transition2 <- exponential_transition(h01 = 0.1, h02 = 0.4, h12 = 0.3)
simTrials <- getClinicalTrials(
nRep = 50, nPat = c(800, 800), seed = 1234, datType = "1rowPatient",
transitionByArm = list(transition1, transition2), dropout = list(rate = 0.5, time = 12),
accrual = list(param = "intensity", value = 7)
)
empSignificant(
simTrials = simTrials, criticalPFS = 2.4, criticalOS = 2.2,
eventNumPFS = 300, eventNumOS = 500
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.