💙 Expand for EKG code library(hrbrthemes) library(elementalist) # remotes::install_github(“teunbrand/elementalist”) library(ggplot2) read_csv( file = “~/Data/apple_health_export/electrocardiograms/ecg_2020-09-24.csv”, # this is extracted below skip = 12, col_names = “µV” ) %>% mutate( idx = 1:n() ) -> ekg ggplot() + geom_line_theme( data = ekg %>% tail(3000) %>% head(2500), aes(idx, µV), size = 0.125, color = “#cb181d” ) + labs(x… <a class=“more-link” href=“https://rud.is/b/2021/02/14/extracting-heart-rate-data-from-apple-health-xml-export-files-using-r-a-k-a-the-least-romant