legg_til_ventetid_stemi_min: STEMI ventetid

In Rapporteket/NORIC: Provide R Resources for NORIC at Rapporteket

STEMI ventetid

Description

Antall minutter fra beslutningsutløsende EKG til arteriepunksjon. Dersom en av datoene/tidspunktene mangler kan ikke ventetiden regnes ut. Ingen filter paa unormalt lange eller negative, ventetider. Dette er en hjelpefunksjon til ki_stemi_pci_innen120min, ventetidene må ikke analyseres utenfor denne funksjonen da datagrunnlaget defineres der.

Usage

legg_til_ventetid_stemi_min(df_ap)

Arguments

df_ap

tabellen med AngioPCI data fra NORIC. Maa inneholde variablene ProsedyreDato, ProsedyreTid,BeslEKGDato, BeslEKGTid, BesUtlEKGDato, BesUtlEKGTid

Value

returnerer df_ap med en ny kolonne: ventetid_stemi_minutter

Examples

x <- data.frame(
 ProsedyreDato = as.Date(c("2020-01-30", "2021-11-15",
                           "2020-11-11", "2021-12-24"),
                         format = "%Y-%m-%d"),
 ProsedyreTid = c("22:30:00", "01:10:00", "13:45:00", "12:20:00"),
 
 BeslEKGDato = as.Date(c("2020-01-30", 
                        "2021-11-14",
                        NA_character_,
                        "2020-01-01"),
                         format = "%Y-%m-%d"),
 BeslEKGTid = c("21:10:00", 
               "23:10:00",
               NA_character_,
               NA_character_),
 
 BesUtlEKGDato = as.Date(c(NA_character_,
                           "2021-11-14",
                           "2020-11-11", 
                           NA_character_),
                         format = "%Y-%m-%d"),
 BesUtlEKGTid = c(NA_character_, 
                  "20:00:00",
                  "09:45:00",
                  NA_character_),
 BeslutningsutlosendeEKG = rep("Ved annet sykehus", 4))
noric::legg_til_ventetid_stemi_min(x)

Rapporteket/NORIC documentation built on Feb. 15, 2024, 5:25 p.m.