Skip to contents

Plot LOS and Readmit Index with Variance

Source: R/los_ra_index_plt.R
los_ra_index_plt.Rd

Plot the index of the length of stay and readmit rate against each other along with the variance

Usage

los_ra_index_plt(.data)

Arguments

.data

The data supplied from los_ra_index_summary_tbl()

Value

A patchwork

ggplot2 plot

Details

  • Expects a tibble

  • Expects a Length of Stay and Readmit column, must be numeric

  • Uses cowplot to stack plots

Author

Steven P. Sanderson II, MPH

Examples


suppressPackageStartupMessages(library(dplyr))

data_tbl <- tibble(
  "alos"                 = runif(186, 1, 20)
  , "elos"               = runif(186, 1, 17)
  , "readmit_rate"       = runif(186, 0, .25)
  , "readmit_rate_bench" = runif(186, 0, .2)
)

los_ra_index_summary_tbl(
  .data = data_tbl
  , .max_los       = 15
  , .alos_col      = alos
  , .elos_col      = elos
  , .readmit_rate  = readmit_rate
  , .readmit_bench = readmit_rate_bench
) %>%
  los_ra_index_plt()


los_ra_index_summary_tbl(
  .data = data_tbl
  , .max_los       = 10
  , .alos_col      = alos
  , .elos_col      = elos
  , .readmit_rate  = readmit_rate
  , .readmit_bench = readmit_rate_bench
) %>%
  los_ra_index_plt()