| hchart.survfit {psichomics} | R Documentation |
Plot survival curves using Highcharts
## S3 method for class 'survfit' hchart(object, ..., fun = NULL, markTimes = TRUE, symbol = "plus", markerColor = "black", ranges = FALSE, rangesOpacity = 0.3)
object |
A survfit object as returned from the |
... |
Arguments passed on to |
fun |
Name of function or function used to transform the survival curve:
|
markTimes |
Label curves marked at each censoring time? TRUE by default |
symbol |
Symbol to use as marker (plus sign by default) |
markerColor |
Colour of the marker ("black" by default); use NULL to use the respective colour of each series |
ranges |
Plot interval ranges? FALSE by default |
rangesOpacity |
Opacity of the interval ranges (0.3 by default) |
highcharter object to plot survival curves
# Plot Kaplan-Meier curves
require("survival")
require("highcharter")
leukemia.surv <- survfit(Surv(time, status) ~ x, data = aml)
hchart(leukemia.surv)
# Plot the cumulative hazard function
lsurv2 <- survfit(Surv(time, status) ~ x, aml, type='fleming')
hchart(lsurv2, fun="cumhaz")
# Plot the fit of a Cox proportional hazards regression model
fit <- coxph(Surv(futime, fustat) ~ age, data = ovarian)
ovarian.surv <- survfit(fit, newdata=data.frame(age=60))
hchart(ovarian.surv, ranges = TRUE)