Description Usage Arguments Details Value Note Author(s) References See Also Examples
This function performs Cox proportional hazards regression using the R package
survival
[1, 2] and summarizes the results in a clean table for a
statistical report.
1 2 3 4 5 6 7 | tabcox(x, time, delta, latex = FALSE, xlabels = NULL, cluster = NULL,
robust.se = TRUE, decimals = 2, p.decimals = c(2, 3), p.cuts = 0.01,
p.lowerbound = 0.001, p.leading0 = TRUE, p.avoid1 = FALSE, n = FALSE,
events = FALSE, coef = "n", greek.beta = FALSE, binary.compress = TRUE,
bold.colnames = TRUE, bold.varnames = FALSE, bold.varlevels = FALSE,
predictor.colname = "Variable", suppress.beta = FALSE,
print.html = FALSE, html.filename = "table1.html")
|
x |
For single predictor, vector of values; for multiple predictors, data frame or matrix with one column per predictor. Categorical variables should be of class "factor." |
time |
Numeric values for time to event or censoring. |
delta |
Indicator variable where 1 = event observed, 0 = censored. |
latex |
If |
xlabels |
Optional character vector to label the |
cluster |
Optional vector indicating clusters of subjects. |
robust.se |
Only a valid option if |
decimals |
Number of decimal places for the regression coefficients, standard errors, hazard ratios, and confidence intervals. |
p.decimals |
Number of decimal places for p-values. If a vector is provided rather than a
single value, number of decimal places will depend on what range the p-value
lies in. See |
p.cuts |
Cut-point(s) to control number of decimal places used for p-values. For example,
by default |
p.lowerbound |
Controls cut-point at which p-values are no longer printed as their value, but
rather <lowerbound. For example, by default |
p.leading0 |
If |
p.avoid1 |
If |
n |
If |
events |
If |
coef |
If set to |
greek.beta |
If |
binary.compress |
If |
bold.colnames |
If |
bold.varnames |
If |
bold.varlevels |
If |
predictor.colname |
Character string with desired column heading for the column of predictors. |
suppress.beta |
If |
print.html |
If |
html.filename |
Character string indicating the name of the .html file that gets printed if
|
NA
A character matrix that summarizes the fitted Cox PH regression model. If
latex = TRUE
, the character matrix will be formatted for inserting into
a Markdown/Sweave/knitr report using the xtable
package [3].
I may eventually write a function to create a summary table based on an object
from coxph
rather than the data vectors themselves (like how
tabglm
works).
If you wish to paste your tables into Word, you can use either of these approaches:
1. Use the write.cb
function in the Kmisc
package
[4]. If your table is stored in a character matrix named table1
, use
write.cb(table1)
to copy the table to your clipboard. Paste the result
into Word, then highlight the text and go to Insert - Table - Convert Text
to Table... OK
.
2. Set print.html = TRUE
. This will result in a .html file writing to
your current working directory. When you open this file, you will see a nice
looking table that you can copy and paste into Word. You can control the name of
this file with html.filename
.
If you wish to use LaTeX, R Markdown, knitr, Sweave, etc., set
latex = TRUE
and then use xtable
[3]. You may have to set
sanitize.text.function = identity
when calling
print.xtable
.
If you have suggestions for additional options or features, or if you would like some help using any function in tab, please e-mail me at vandomed@gmail.com. Thanks!
Dane R. Van Domelen
1. Therneau T (2013). A Package for Survival Analysis in S. R package version 2.37-4, https://cran.r-project.org/package=survival.
2. Terry M. Therneau and Patricia M. Grambsch (2000). Modeling Survival Data: Extending the Cox Model. Springer, New York. ISBN 0-387-98784-3.
3. Dahl DB (2013). xtable: Export tables to LaTeX or HTML. R package version 1.7-1, https://cran.r-project.org/package=xtable.
4. Kevin Ushey (2013). Kmisc: Kevin Miscellaneous. R package version 0.5.0. https://CRAN.R-project.org/package=Kmisc.
Acknowledgment: This material is based upon work supported by the National Science Foundation Graduate Research Fellowship under Grant No. DGE-0940903.
coxph
tabfreq
tabmeans
tabmedians
tabmulti
tabglm
tabgee
tabfreq.svy
tabmeans.svy
tabmedians.svy
tabmulti.svy
tabglm.svy
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | # Load in sample dataset d and drop rows with missing values
data(d)
d <- d[complete.cases(d), ]
# Create labels for race levels
races <- c("White", "Black", "Mexican American", "Other")
# Test whether race is associated with survival
coxtable1 <- tabcox(x = d$Race, time = d$time, delta = d$delta,
xlabels = c("Race", races))
# Test whether age, sex, race, and treatment group are associated with survival
coxtable2 <- tabcox(x = d[,c("Age", "Sex", "Race", "Group")], time = d$time,
delta = d$delta,
xlabels = c("Age", "Male", "Race", races, "Treatment"))
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.