View source: R/abnormal_by_worst_grade_worsen.R
h_adlb_worsen | R Documentation |
Helper function to prepare a df
for generate the patient count shift table.
h_adlb_worsen(
adlb,
worst_flag_low = NULL,
worst_flag_high = NULL,
direction_var
)
adlb |
( |
worst_flag_low |
(named |
worst_flag_high |
(named |
direction_var |
(
|
h_adlb_worsen()
returns the adlb
data.frame
containing only the
worst labs specified according to worst_flag_low
or worst_flag_high
for the
direction specified according to direction_var
. For instance, for a lab that is
needed for the low direction only, only records flagged by worst_flag_low
are
selected. For a lab that is needed for both low and high directions, the worst
low records are selected for the low direction, and the worst high record are selected
for the high direction.
abnormal_by_worst_grade_worsen
library(dplyr)
# The direction variable, GRADDR, is based on metadata
adlb <- tern_ex_adlb %>%
mutate(
GRADDR = case_when(
PARAMCD == "ALT" ~ "B",
PARAMCD == "CRP" ~ "L",
PARAMCD == "IGA" ~ "H"
)
) %>%
filter(SAFFL == "Y" & ONTRTFL == "Y" & GRADDR != "")
df <- h_adlb_worsen(
adlb,
worst_flag_low = c("WGRLOFL" = "Y"),
worst_flag_high = c("WGRHIFL" = "Y"),
direction_var = "GRADDR"
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.