Produce hazard ratio table and plot from a Cox Proportional Hazards analysis, survival::coxph()
.
hr_plot(.data, dependent, explanatory, factorlist = NULL, coxfit = NULL, breaks = NULL, column_space = c(-0.5, 0, 0.5), dependent_label = "Survival", prefix = "", suffix = ": HR (95% CI, p-value)", table_text_size = 5, title_text_size = 18, plot_opts = NULL, table_opts = NULL, ...)
.data | Dataframe. |
---|---|
dependent | Character vector of length 1: name of survival object in form |
explanatory | Character vector of any length: name(s) of explanatory variables. |
factorlist | Option to provide output directly from |
coxfit | Option to provide output directly from |
breaks | Manually specify x-axis breaks in format |
column_space | Adjust table column spacing. |
dependent_label | Main label for plot. |
prefix | Plots are titled by default with the dependent variable. This adds text before that label. |
suffix | Plots are titled with the dependent variable. This adds text after that label. |
table_text_size | Alter font size of table text. |
title_text_size | Alter font size of title text. |
plot_opts | A list of arguments to be appended to the ggplot call by "+". |
table_opts | A list of arguments to be appended to the ggplot table call by "+". |
... | Other parameters passed to |
Returns a table and plot produced in ggplot2
.
Other finalfit plot functions: coefficient_plot
,
ff_plot
, or_plot
,
surv_plot
# HR plot library(finalfit) library(dplyr) library(ggplot2) data(colon_s) explanatory = c("age.factor", "sex.factor", "obstruct.factor", "perfor.factor") dependent = "Surv(time, status)" colon_s %>% hr_plot(dependent, explanatory, dependent_label = "Survival")#> Warning: Dependent variable is a survival object#> Warning: Removed 4 rows containing missing values (geom_errorbarh).colon_s %>% hr_plot(dependent, explanatory, dependent_label = "Survival", table_text_size=4, title_text_size=14, plot_opts=list(xlab("OR, 95% CI"), theme(axis.title = element_text(size=12))))#> Warning: Dependent variable is a survival object#> Warning: Removed 4 rows containing missing values (geom_errorbarh).