This vignette is a description of the distribution characteristics of patients' Age bands for the CLAHRC NWL Heart Failure Care Bundle project at North West London Hospitals.

The original raw data set from North West London Hospitals clahrcnwlf::admission_data was extracted and cleaned for analysis by Dr. T Woodcock using clahrcnwlhf::clean_and_save. The data covers discharge periods 1st January 2012 to 31st October 2016.

Data set

This analysis is restricted to only emergency admissions data clahrcnwlhf::emergency_adms (i.e. data for those episodes for which admission_data_clean$AdmissionType = "Emergency").

emergency_adms <- clahrcnwlhf::emergency_adms

Let us first restrict attention to only the first episode of each spell.

emergency_spells <- emergency_adms[
  which(emergency_adms[,"EpisodeNumber"] == 1),]

Age band distribution (split by) period.date

First lets plot a plot of age-dist Age Band frequency using emergency_spells data. Age Band in the first ggplot is split by period.date: period A (discharges before the CLAHRC NWL Heart Failure Care Bundle project) and period B (discharges after the CLAHRC NWL Heart Failure Care Bundle project)

clahrcnwlhf::plot_age_dist(emergency_adms, stratify = TRUE)

Age band distribution (Overall distribution, i.e period.date A & B combined)

Second lets plot out

clahrcnwlhf::plot_age_dist(emergency_adms)

Frequency table

clahrcnwlhf::plot_dist_table(emergency_spells)


HorridTom/clahrcnwlhf documentation built on May 7, 2019, 4:02 a.m.