From 7b45e92ba56573e3f882c665f25ff2e27fc93940 Mon Sep 17 00:00:00 2001
From: Peter Owen <pete.owen1@hotmail.co.uk>
Date: Wed, 16 Aug 2023 11:38:59 +1000
Subject: [PATCH] add data_subclass column

---
 R/seifa.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/seifa.R b/R/seifa.R
index 9013760..bcc8ebe 100644
--- a/R/seifa.R
+++ b/R/seifa.R
@@ -119,7 +119,7 @@ get_seifa <- function(structure = c('sa1','sa2','lga','postcode','suburb'),
 
   if (file.exists(filename)) {
     ind <- map(sheet_names, ~ get_seifa_index_sheet(filename, .x, structure, year), .id = 'seifa_index') %>%
-      list_rbind()
+      list_rbind(names_to = 'data_subclass')
     return(ind)
   } else {
     warning('Download of ABS file failed. Please check your internet connection and try again.')