| kmTCGA | R Documentation |
Plots Kaplan-Meier estimates of survival curves for survival data.
kmTCGA( x, times = "times", status = "patient.vital_status", explanatory.names = "1", main = "Survival Curves", risk.table = TRUE, risk.table.y.text = FALSE, conf.int = TRUE, return.survfit = FALSE, pval = FALSE, ggtheme = theme_RTCGA(), ... )
x |
A |
times |
The name of time variable. |
status |
The name of status variable. |
explanatory.names |
Names of explanatory variables to use in survival curves plot. |
main |
Title of the plot. |
risk.table |
Whether to show risk tables. |
risk.table.y.text |
Whether to show long strata names in legend of the risk table. |
conf.int |
Whether to show confidence intervals. |
return.survfit |
Should return survfit object additionaly to survival plot? |
pval |
Whether to add p-value of the log-rank test to the plot? |
ggtheme |
a |
... |
Further arguments passed to ggsurvplot. |
If you have any problems, issues or think that something is missing or is not clear please post an issue on https://github.com/RTCGA/RTCGA/issues.
Marcin Kosinski, m.p.kosinski@gmail.com
RTCGA website http://rtcga.github.io/RTCGA/articles/Visualizations.html.
Other RTCGA:
RTCGA-package,
boxplotTCGA(),
checkTCGA(),
convertTCGA(),
datasetsTCGA,
downloadTCGA(),
expressionsTCGA(),
heatmapTCGA(),
infoTCGA(),
installTCGA(),
mutationsTCGA(),
pcaTCGA(),
readTCGA(),
survivalTCGA(),
theme_RTCGA()
## Extracting Survival Data
library(RTCGA.clinical)
survivalTCGA(BRCA.clinical, OV.clinical, extract.cols = "admin.disease_code") -> BRCAOV.survInfo
## Kaplan-Meier Survival Curves
kmTCGA(BRCAOV.survInfo, explanatory.names = "admin.disease_code", pval = TRUE)
kmTCGA(BRCAOV.survInfo, explanatory.names = "admin.disease_code", main = "",
xlim = c(0,4000))
# first munge data, then extract survival info
library(dplyr)
BRCA.clinical %>%
filter(patient.drugs.drug.therapy_types.therapy_type %in%
c("chemotherapy", "hormone therapy")) %>%
rename(therapy = patient.drugs.drug.therapy_types.therapy_type) %>%
survivalTCGA(extract.cols = c("therapy")) -> BRCA.survInfo.chemo
# first extract survival info, then munge data
survivalTCGA(BRCA.clinical,
extract.cols = c("patient.drugs.drug.therapy_types.therapy_type")) %>%
filter(patient.drugs.drug.therapy_types.therapy_type %in%
c("chemotherapy", "hormone therapy")) %>%
rename(therapy = patient.drugs.drug.therapy_types.therapy_type) -> BRCA.survInfo.chemo
kmTCGA(BRCA.survInfo.chemo, explanatory.names = "therapy",
xlim = c(0, 3000), conf.int = FALSE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.