Skip to content

Latest commit

 

History

History
68 lines (53 loc) · 2.31 KB

README.md

File metadata and controls

68 lines (53 loc) · 2.31 KB

readaihw

Lifecycle: experimental CRAN status R-CMD-check Codecov test coverage

The purpose of readaihw is to provide access to the MyHospitals API so that hospital data from the AIHW can be accessed directly from R. For details about what data are provided by the AIHW see here. See here for details about the MyHospital API.

Installation

You can install the development version of readaihw like so:

# install.packages("pak")
pak::pkg_install("RWParsons/readaihw")

Example - ED presentations

This example gets data on hospital presentations and presents these counts as a graph for hospitals in the ACT local hospital network over time.

library(readaihw)
library(dplyr)
library(ggplot2)

ed_presentations <- read_flat_data_extract("MYH-ED")

act_hospital_codes <- get_hospital_mappings() |>
  filter(
    local_hospital_network_lhn == "Australian Capital Territory",
    type == "Hospital"
  ) |>
  pull(code)

ed_presentations |>
  filter(reporting_unit_code %in% act_hospital_codes) |>
  select(date = reporting_end_date, hospital = reporting_unit_name, value) |>
  mutate(value = as.numeric(value), date = lubridate::ymd(date)) |>
  summarize(count = sum(value, na.rm = TRUE), .by = c(hospital, date)) |>
  ggplot(aes(date, count)) +
  geom_line() +
  geom_point() +
  facet_wrap(~ stringr::str_wrap(hospital, 40)) +
  theme_bw() +
  scale_y_continuous(labels = scales::label_comma()) +
  labs(x = "", y = "ED Presentations (n)", title = "ED presentations in the ACT LHN")