ggsurvevents | R Documentation |
Distribution of Events' Times
ggsurvevents(
surv = NULL,
fit = NULL,
data = NULL,
type = "fraction",
normalized = TRUE,
censored.on.top = TRUE,
ggtheme = theme_survminer(),
palette = c("grey75", "grey25"),
...
)
surv |
an object of Surv. If not suplied, the censoring variable is extracted from the model. |
fit |
an object of class survfit. |
data |
a dataset for predictions. If not supplied then data will be extracted from 'fit' object. |
type |
one of |
normalized |
if |
censored.on.top |
is TRUE then censored events are on the top |
ggtheme |
function, ggplot2 theme name. Allowed values include ggplot2 official themes: see theme. |
palette |
the color palette to be used for coloring of significant variables. |
... |
other graphical parameters to be passed to the function ggpar. |
return an object of class ggplot
Przemyslaw Biecek, przemyslaw.biecek@gmail.com
require("survival")
# from Surv
surv <- Surv(lung$time, lung$status)
ggsurvevents(surv)
surv2 <- Surv(colon$time, colon$status)
ggsurvevents(surv2)
ggsurvevents(surv2, normalized = TRUE)
# from survfit
fit <- survfit(Surv(time, status) ~ sex, data = lung)
ggsurvevents(fit = fit, data = lung)
# from coxph
model <- coxph( Surv(time, status) ~ sex + rx + adhere, data = colon )
ggsurvevents(fit = model, data = colon)
ggsurvevents(surv2, normalized = TRUE, type = "radius")
ggsurvevents(surv2, normalized = TRUE, type = "fraction")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.