readme updates

README.Rmd

@@ -59,20 +59,21 @@ The `tidycmprsk` plays well with other packages, such as `gtsummary`.
 tbl <- 
   crr_mod %>%
   gtsummary::tbl_regression(exponentiate = TRUE) %>%
+  gtsummary::add_global_p(anova_fun = gtsummary::tidy_wald_test) %>%
   add_n(location = "level")
 ```
 
 ```{r gtsummary_print, include = FALSE}
 # Had to manually save images in temp file, not sure if better way.
-gt::gtsave(gtsummary::as_gt(tbl), file = file.path(tempdir(), "temp.png"))
+gt::gtsave(gtsummary::as_gt(tbl), file = "man/figures/README-gtsummary-crr.png")
 ```
 
 ```{r out.width = "50%", echo = FALSE}
 # Have to do this workaround since the README needs markdown format for GitHub page but a different format for the website.
 if (identical(Sys.getenv("IN_PKGDOWN"), "true")) {
   tbl
 } else {
-  knitr::include_graphics("man/figures/README-gtsummary_print-1.png")
+  knitr::include_graphics("man/figures/README-gtsummary-crr.png")
 } 
 ```
 
@@ -109,15 +110,15 @@ tbl <-
 
 ```{r gtsummary_print2, include = FALSE}
 # Had to manually save images in temp file, not sure if better way.
-gt::gtsave(gtsummary::as_gt(tbl), file = file.path(tempdir(), "temp.png"))
+gt::gtsave(gtsummary::as_gt(tbl), file = "man/figures/README-gtsummary-cuminc.png")
 ```
 
 ```{r out.width = "70%", echo = FALSE}
 # Have to do this workaround since the README needs markdown format for GitHub page but a different format for the website.
 if (identical(Sys.getenv("IN_PKGDOWN"), "true")) {
   tbl
 } else {
-  knitr::include_graphics("man/figures/README-gtsummary_print2-1.png")
+  knitr::include_graphics("man/figures/README-gtsummary-cuminc.png")
 } 
 ```
 
@@ -130,4 +131,4 @@ By contributing to this project, you agree to abide by its terms. Thank you to a
 #### Limitations
 
 The `tidycmprsk` package implements most features (and more) available in `cmprsk`.
-However, the time interaction features available in `cmprsk::crr()` have not yet been made available in `tidycmprsk`.
+However, the time interaction features available in `cmprsk::crr()` is not available in `tidycmprsk`.

README.md

@@ -63,10 +63,11 @@ The `tidycmprsk` plays well with other packages, such as `gtsummary`.
 tbl <- 
   crr_mod %>%
   gtsummary::tbl_regression(exponentiate = TRUE) %>%
+  gtsummary::add_global_p(anova_fun = gtsummary::tidy_wald_test) %>%
   add_n(location = "level")
 ```
 
-<img src="man/figures/README-gtsummary_print-1.png" width="50%" />
+<img src="man/figures/README-gtsummary-crr.png" width="50%" />
 
 ``` r
 gtsummary::inline_text(tbl, variable = age)
@@ -118,7 +119,7 @@ tbl <-
   add_n()
 ```
 
-<img src="man/figures/README-gtsummary_print2-1.png" width="70%" />
+<img src="man/figures/README-gtsummary-cuminc.png" width="70%" />
 
 ## Contributing
 
@@ -145,4 +146,4 @@ you to all contributors!
 
 The `tidycmprsk` package implements most features (and more) available
 in `cmprsk`. However, the time interaction features available in
-`cmprsk::crr()` have not yet been made available in `tidycmprsk`.
+`cmprsk::crr()` is not available in `tidycmprsk`.