read estimated dwelling stock by SA2

library(readabs)

path <- file.path(tempdir(), "abs_dwellings")
dir.create(path)

dwellings_sa2_zip <- download_abs_data_cube("estimated-dwelling-stock",
                                        "zip",
                                        path = path)

zip::unzip(dwellings_sa2_zip,
           exdir = path)

dwellings_csv_loc <- list.files(path, pattern = ".csv", full.names = T)


dwellings_csv_loc |> 
  readr::read_csv()