From a397b7e3b3f7f62455a32753426e2fcf67e97957 Mon Sep 17 00:00:00 2001 From: Peter Owen Date: Tue, 15 Aug 2023 14:32:15 +1000 Subject: [PATCH 1/5] update anzsic2006 to download from abs source --- data-raw/create_anzsic2006.R | 101 +++++++++++++++++++++++------------ data/anzsic2006.rda | Bin 10416 -> 10506 bytes 2 files changed, 66 insertions(+), 35 deletions(-) diff --git a/data-raw/create_anzsic2006.R b/data-raw/create_anzsic2006.R index dff8926..23c6c03 100644 --- a/data-raw/create_anzsic2006.R +++ b/data-raw/create_anzsic2006.R @@ -2,47 +2,78 @@ # Reading and cleaning ANZSIC correspondence library(tidyverse) -library(glue) +library(rvest) # include factor variants or nah? include_factor_variants <- FALSE -# ty asiripanich -anzsic_url <- "https://raw.githubusercontent.com/asiripanich/anzsic/master/anzsic_2006.csv" - -# Read -anzsic_raw <- read_csv(anzsic_url) %>% - rename_all(~ glue("anzsic_{.}")) %>% - mutate_if(is.double, as.integer) %>% - as_tibble() - -# Add layers of nfd -class_nfd <- anzsic_raw %>% - distinct(anzsic_division_title, anzsic_division_code, - anzsic_subdivision_title, anzsic_subdivision_code, - anzsic_group_title, anzsic_group_code) %>% - mutate(anzsic_class_code = anzsic_group_code * 10, - anzsic_class_title = glue("{anzsic_group_title}, nfd")) - -group_nfd <- anzsic_raw %>% - distinct(anzsic_division_title, anzsic_division_code, - anzsic_subdivision_title, anzsic_subdivision_code) %>% - mutate(anzsic_group_title = glue("{anzsic_subdivision_title}, nfd"), - anzsic_group_code = anzsic_subdivision_code * 10, - anzsic_class_title = anzsic_group_title, - anzsic_class_code = anzsic_group_code * 10) - -subdivision_nfd <- anzsic_raw %>% - group_by(anzsic_division_code, anzsic_division_title) %>% - summarise(anzsic_subdivision_code = min(anzsic_subdivision_code)) %>% - mutate(anzsic_subdivision_title = glue("{anzsic_division_title}, nfd"), - anzsic_group_title = anzsic_subdivision_title, - anzsic_group_code = anzsic_subdivision_code * 10, - anzsic_class_title = anzsic_group_title, - anzsic_class_code = anzsic_group_code * 10) +# fetch from abs website +url <- "https://www.abs.gov.au/statistics/classifications/australian-and-new-zealand-standard-industrial-classification-anzsic/2006-revision-2-0/numbering-system-and-titles/division-subdivision-group-and-class-codes-and-titles" + +df <- url %>% + rvest::read_html() %>% + rvest::html_table() + +# bind tables together +anzsic_2006_temp <- + purrr::list_rbind(df) + +# fix columns names and bind together +colnames(anzsic_2006_temp) <- c("anzsic_division_code", "anzsic_subdivision_code", "anzsic_group_code", "anzsic_class_code", "title") + +first_row <- + as.data.frame(t(colnames(df[[1]]))) + +colnames(first_row) <- c("anzsic_division_code", "anzsic_subdivision_code", "anzsic_group_code", "anzsic_class_code", "title") + +anzsic_2006_total <- + dplyr::bind_rows(first_row, anzsic_2006_temp) + +# replace blanks with NAs +anzsic_2006_total[anzsic_2006_total == ""] <- NA + +# fill NAs down from above +anzsic_2006_fill <- + anzsic_2006_total %>% + tidyr::fill(colnames(anzsic_2006_total), .direction = c("down")) + +# get each grouping type individually +anzsic_2006_class <- + anzsic_2006_total %>% + dplyr::filter(stringr::str_detect(anzsic_class_code, "^[:digit:]+$")) %>% + dplyr::select(anzsic_class_code, anzsic_class_title = title) + +anzsic_2006_group <- + anzsic_2006_total %>% + dplyr::filter(stringr::str_detect(anzsic_group_code, "^[:digit:]+$")) %>% + dplyr::select(anzsic_group_code, anzsic_group_title = title) + +anzsic_2006_subdivision <- + anzsic_2006_total %>% + dplyr::filter(stringr::str_detect(anzsic_subdivision_code, "^[:digit:]+$")) %>% + dplyr::select(anzsic_subdivision_code, anzsic_subdivision_title = title) + +anzsic_2006_division <- + anzsic_2006_total %>% + dplyr::filter(stringr::str_detect(anzsic_division_code, "^[:alpha:]+$")) %>% + dplyr::select(anzsic_division_code, anzsic_division_title = title) + +# combine grouping types into final table +anzsic_2006_final <- + anzsic_2006_fill %>% + dplyr::left_join(anzsic_2006_division) %>% + dplyr::left_join(anzsic_2006_subdivision) %>% + dplyr::left_join(anzsic_2006_group) %>% + dplyr::left_join(anzsic_2006_class) %>% + dplyr::filter(!is.na(anzsic_class_title)) %>% + dplyr::select( + anzsic_division_code, anzsic_division_title, anzsic_subdivision_code, anzsic_subdivision_title, + anzsic_group_code, anzsic_group_title, anzsic_class_code, anzsic_class_title + ) %>% + dplyr::as_tibble() # Finalise data frame; noting that we are avoiding the nfd complication for now -anzsic2006 <- anzsic_raw %>% +anzsic2006 <- anzsic_2006_final %>% arrange(anzsic_division_code, anzsic_subdivision_code, anzsic_group_code, diff --git a/data/anzsic2006.rda b/data/anzsic2006.rda index 46ebac8163e027da59cd9899b99d8e924842a6be..a261e14bb01fad56d803bedca08f46ffc19dc0bf 100644 GIT binary patch literal 10506 zcmX9@byyP)&|VN@Y%scU8>2g=9X)!alsHmCx=TloloXJVQBu+k@}s3hKn10wR6-;b zuzug~`@Z|_4*mQ8_V+(G|IhKiCs+W0 zVN>;%)=uW2)d?5?pf206YaHhgI?8QZg)7v*tA)$`3I^}aH=7Xmc<_^E{DzfbPemBB zF`9WS6yi$p%3KXS%U-Ej8@?tN(6u&q?j3$L?!&-~#Ddx=KQS4vx~`>Usijr1$g`td zH?{tpa{Qq=pnm^(sHl>n4qAZ7$)qLl#LM#ur{y2GfW?$TF7^VJ-6k*NxnH3wQ1cde z;DiApYsqp{L@*WrEC>9rQ4t}}HY-F5(*ck-|AjP_0{;gC+4ZY%`iN(>o|V`)SU3RS z@qaMb7{I_!u|gCOcp|5p`$oS`tx_aH%gf`xEU;X)h6zI0r19=%PKg0$GfYWpN~=Ha}E0vswW_c$cw&2U0{J<<&XQ+{cBLI!lD-kAJ_S z>$?GI^UwxgW~->uwXWtxA^>=FTz(5eJyuUW@n{l!R?kbJHF8Vl*)i}h==XLwQI+rq z@<${BaEn9@sB&3H+`OZg@PKgqS8@k@eM4dBv7s*O35vnh){>^YD>&WCG~4VAG1dbKG>C9rC#zzBzSF!ZgFioN^v-@@JDYzs51j9I$GGoJ`8cu%bH~INYe>PC}*ARJ;4Mt0H4@o4b*CdA!uF3f&*ArvA3e`&Kgs zw$X*I(iG;273~yXHRx1e2goE>4X&E~zWb;*?Y{fVsBx&Rr{QFu1i$EcjX-V^!6Q(}^9Xl)rTPRdq;KeW0^_Mn{fM z3kUxcCc6iZFDC*(21Rb(?p{BE?*o6S}{H`*q6cj9`(AfSB>CW^hJiHhJ-O#2_;O5 zjJ`C+U*KlEYlXfrCWG-)ah|>cKckPwYN5GyKBf+XqhSQ(VhA*`L`@?+U<#9il`6ty zGj%rWSXp;OwJdpiQznZ1#=LLfH;ZcT9;vS%;h9;zpY^9v0m1c|oqYr$zXNo^s3&kf zq%82A>m7w*=u`%#Ee!Nco@@s0?ljq-9|bmN8Az*EJFY6yY*BM-(#R z>Sy0skbbtXAwr|%W6ekR-;chQRq?EB^9%vIxW-cmzeAW0x2aZZ=*)k%h;L!VYKhSi z%t$gAga&V8xltRl86}|3)hP(b0<}+RM~1BMGlUiakPD0eP1R5~pkWkMEOAQJ>L}bLWAk)x?5wMVLYf-{jigeM zQfcN1wXKZjg^XK8+PW^BChDUtCcRpW_L!PL`+VwpibkxWUJzp&d$?3p;roR5b}&}O zgbIT)+2@bxLn%`f6Iva7*&-#{AZW$a5RCs*(dWD=3UM*m2aE{h4L2(m8>C1AB(=c` zS6hEWn-T!{b)vjoA?bj?%kHAsBg{4oYf}F0scxi?e5iEQtWA%WM<2AnO> z$HDl&+(nigw=ezDjiF@$xBOY4X#xM~N5VBFzFH{w;7T!ihALf)bs7> z)}pd!2^y)q^L~xKOwPVDA@!NOaV_$N5i%uG5tF? z-hK*4fi($ph0MIv-7$Y6y=M|=?g4|#w9JsVGe2@1xOS>qQI!uW8oMfgBfKa#!?VQv zYSSt^FWC7SSBSRgpNU8&<1M1pvt8tNi4*8>W1hiooMdB>9nbqJeBn-7MtYGoVh$3S3a6x7bZ|4 zeyfgch)B!9`@OEITw(aY*`X=h)OvO;SjhRE0vMr^rK+|&j&X3Xm6;355}g&MWvH=l z?`|UBga(=PIz4mkWSNTb(RZp$w(&7=52^ay)*zSU>lLaJA%7UcukRnzmwd#(DShJf z;l>Rm08eR%HHM~R4b~*SoAHW-GlE{;l(-1yab~-B7fffC?C|7E2wJv-1IjgR)EhXT z5MIGt|2FYFjOWg2qT@mdga)a=^jc@aPgnKTNI0Lue%X7ez##&!GF*XNH^~48aBG+> zoz7s2$zJ*fA5qM@g5GcGRzCwj1{<1*$Mo`rMS;RF4>pT-(h4LrnMypEaUp)z`$J|w zBFom)<@({JHwBx8Pl`OLaS2w@;Z(XpOyKAub8}HsAI{9IRY|%jHy@%S2xL^$L9Lw- zZN;C8ryCbl*J?zL^+eb1`(pANmhH7ql#43}hmz25ifn@TObPTC16iHZMtV+ z9Sod4JC`d~dgEeYW-LdXG19KSbf?Ou7nDh z<60!+?v&&X@jvq9^i7zV{d)6`TX5%3i#hPXg{Hv0;E_?vqQ_}k@|0FqGHwMSRqh3VOVT&H( zuvr-rRy1|qQ1q?7T~@VjslcbMKjN^VK<#|FIeK<|y|}+UOjc$Ap}~+ope-^AhD1ah zM4byn)%TsFS9zUFcRW819W+Ek>+6z5$4Fq7gh$3adLcY&YI2vQP3nGL_4Td-?wW3E zVH`T46#Rk3&uSj@>apHs>Zd@JF$`-~W(1fd2g?iOG{d%hwrZ%JxQi_s>bZR|G(hvg zWZaNAgHNTm9F5-vkB2d=+@4z`kplZ`mAe+Rx3mbn1^K&lTOZb!o_q|~-71k9^Xe1P zx{VpiR~?UDyml)Qi8p-SVdc7MWHxH4x;y8{k@?x@Td3+tNX?8W#Om8x2ta)t*({qmmQsoii(n`94LfHw;fKQ>)f#0^C7)_ zx1*Y+yWTMWRd5d~3o2U9#nsnq=UZTA$0)3D;c=^wy)l>HXO;REh&CKv$8>m2#vZ|qT%{~5%CkC#Q^}Si7U=0d7cGjK&E#5GP)2%XP zzMx2<`uYk7&%&!X#hz>racYJ>(ko9%(Njkw~GB7->QZ z9df^9M_FHgNpidL4aaI@?e6ena4*}qsJIvI+_pdSPFC?>4fA4F_SiPLr8LJP%Mr7$uUaIO%qe`yFyZlEFp;@1Y_&mT1xR!_IF`i{9q8I=gOdhC z#V=nLzfVqzN<-JI^@lz4^Q&<0bDw(@w!yKczG;0-Ww6~1-|3mo7=Sy_ z{Zf(4j!3>ITUt=`!sx%F=Fy6SgO1s&m2Z-T>L#JRvqwg=Gda~;p+O~jsH43vD$4s- zx7&Oi$&(Vf#!p!HoEX3cg-*#~!TWC-t-Zhd-K0=l*v#2@Whu#cqU>0GtOvK|qIxM@ z5rbx27kbfmDXUgQx~IM0(5xyTT_aNZ@>D3*(sKNto2#W!1b2eF-4#!WQbb90wV%Md zH##4LbzE4d&F<$GrL&_&DnwzClHq=FQis)hFQjZ9g_U)(%>1Z{X*X3>)ywnIS?})& zr?8yku(J9vT$D9Ae_;CG&=`8dH<(JSEDe456XSj^zkLK47QWd&E?Q;7B67E`tQ?Kx zHoa#tI`bh))@oCrnSb|rQc4o@2u*xq*KnKwbG5j=j7wfe3~<+9N-<;mlz*k=@{S$9 zZc>FYz7*D$#M~fvKq=ihT@|al#NWagfumwgL0H;8xePs`bI4Sg9i27$*pQp_^VvIs z+2S1@iT<-pwKWHo@CA6m`=Fw^krWb=6#Gs-v~*fAfLmz)+tH`Y{ELd?P;Kw=R1hYN@r=jH^N4XXeK-a|cfYfbl<=ejlIl{vNu^EOfO* z#WzjAGWf8nat7!?b*lth@I87Gj=H>9bd3I6;miDs-?EzV=y9z9ftHLgx(w%^j+u<{ zV9+yB>0*2J+*6jPoDCmb`Av5bM|7O`Wc_d>>QIZWyh!!%cgDL2zZZf3s=fIAoPj1E z{Z(-1MlgMaydDKjX-1Ra3HE*z!jsi}lLk;V)T!Bil7cEE>WWZiB~jR4Ea%Hqkq zZPKoCcb z>Lb0>W|}I<6XNfHh}Y3<;dE!&k#9@kOVhurRQ7tG>UFdRKiT@qHLbvRwNIDL?UTdH zZiFZGQ1Cf0IDIU1wUqJJ^|nYSJ52FG?ho~RZjG9STAnv9hZ<=zBKsz8grf4acpn@- zicG+KPoQD0IwA*Yem%1nAe~a&R8*`{LiMzAL4OKKNhywFp#gQ`ZnF}Fat z#*5Lc67Kk~Cdd|D3jkPgOidoy$?Zm?jbc!CJsMQ&MV>@CT<(@>w!Y2Vu%3vG%7(6I ztFsRTt}VGMx?-;f+mfw6nG|ps?qm$f#YK*Qe>{2JTbSpab8lmA16cV;P#W92;{=OCSh(jS1Y)k={QQ2Xm^gjDMiE++Ys8n0_^)lk9yBir_TQ&f%4#43S!vl zE4Q@u!}BWNp&qzv#Vy4<#=}Z`nfD(#mFG!>FVbB{RS?@>rzn?g^*YfL8&qSZKZyc_zu5UY!Z_IRxvrNLSB$t)p zPRYK$iYxukX~uYun%m11gL6|Z|bGiV83SgeB{>m4pj$m1a6qjJlZnK@_)0VSDNcdp1nJFe6++0%L@dat`; zFGsT}g0)V)~E0xb!>et0WH=AQU>s^F#2pkhQuFp$RP| z)mK5qtS~{j&(7qrsHRo0se~1SAtR!+7f(ID@wfze_gT_JGV{tMd_-pkf|uGqGfHHk zsmn=0AI~uNv0E^$A70TK_IG%G`#m6@{fzmT43JK1d54P(TG~rSq*C_^ z7K8xTGvh@^!kFWjCOUQK*{N$pc<;I=L{KDuVfLcA{>xmpjk6K(9qlwc4qL73y?vLy z)4w+OG%LOc!lXEgpvXtkWTB>5cXAZGT-6_`W`^s&*hf;|HsgN-8OYM()aU7=@%0pA z@7r1x6Z(`x#^`LtKkP1Ym!|F=*0am}cl5Q2Bh%FPtJiI@KcCimWDA)+YC?Q3t9wCDSK-c=Z+Pt=E!SW89tmH&|qq>Y% z(ibJD=d0Fij#ugCYl4eLk9h(CD?!S8>l=g?IF~@lu*OWB`xxvI1bjhyi~hZ1z}N!kt*&Sei~jGqz4Ne;(EjuD0)RW z;D~J_`yZZ2%2KMD78HGhWr9#+6_lcE+2uWs*^=yxzlHSX%hh34h;Kw89FcE1v?TrW znGdyus*SU91>h+5IVIp-`=`%W&(tsPMlR(Ck6{s6j8wZWV`JbPG;RURLJFpfi}~vf zc!jJ&QaC)^WkXLypD1!#ybq7mAoBDipZC=AiO;B{Z2GrvfR~17 zheYqQKh^p>!*T%l#xpK;1FA*TRlDth_VjykiDQf!gVYW|F_fwGVhD91LKsh2FL}m~!8!3%R=Rg$%Ddghf zaE+P>YjPp!G0gSxA|2WP4IW@_i;0KEqnN9ZRh;!8plh~1NGw)?2EsYX?yc=9-MBf> zSpFOO`O(Y=Sh-YOg20^ldw#TAxu>ehn#eY=wh_k(?qVa`QjxViH>aM~&E_=6>b+}H zlNo5nX5g7S>3`Q|Q{KVe1cP}V&vljNhHuseT8fAu@)mQ%b-1eN3(HKKzsvr{_Foqj z-s;cGla)cr#Y;Sv#!sqWOkSI61sAGLz3>xXeIfDf39SfLI`NU5(4}1sd$+z0uqyEz z+eHtoy}s5bS^0ZSMuDs5@R;0thb6|m>R8_)Z2}g-Ybhu2{yPJF3dnB#OR#onuw5e@WPo5 z@DdT%yA3>6eMU>US1vi z3PY%1Kz0CevRoJ4SjQg^;iEtxhoK`HI8F2Q+kS(Ofh@6BpKe!{S z8RRQ*o1imEXFuoWaet+z>R;cz#X$<=d2m?dUpFO*p>~eab%+p^Yy`QA4qwMi1ZAnh z$eIG&u8sdh!}BAw&bk){mrY{LK;;FjBM7ume?NCpid<=hgVnEGXZcziE>vI42IX+0 zE#XfAqPPa8ZJ+|v908xR7h&fphCYkV1>LgQyZl{!F4h?I^XnCa$sTU%5c@px$<4@1o~&1$UUYsL)O%s zgt%?U?Y1Qlk?16Wi+-)Q4u9(N_NIPxj{+I0oIJ_8J@R=4W#Wsn7sXkD{KvoR&pRb$ zUQ5hjiE(aJqtv%+c{?b?<{Ilev?R)Vj0Ch(P)`h64e>%d@n>!;Arv|h-TrIXbJHjN z^$Oz1M-K#ZM{ar0<=SzR@=Bq(G>n>kqLM&tN?TYMRKX|KxLrDHz#@SO>xAQn2tpkK zIf?oJW|f%|8WH%5;LXz?$>9&odS4E2z=@j$m3eC*O3wyPy4MNyq5snw!_5!lb5#j7 zIwU74_q7ThD2NWR6WuyEc7NK%bpkw%Bhc1n8%+@X>?CPv`8AGS*h?(#GBCq5)A#yI zx6D?B$eu-l1S*F+d^q+!vtWnGk_=JD@@EA*=I`({4d_qtmpq{J5CrtUtZG-m?2g zjQLjunUAcwIZ6WZVx;ps+U~Jmi`4Lv->OOD>?;2W#$Ir` z$|ZHgau;wZ$!7&9Bb%z&`If^3qgy)Za&mUi%R1&Ul1fOBztjH+dUjV3s%Y3tL1H8X zo6CJbv%~J=$@*(QOe?cg1QL0h!PeDsQ(xtVmmI0(PV0?ye>BkUDK~TLgJ@UPJuqMS zdTF6kl!ii#E#|aHs97V?8$iqG)k3^aG9VRXS#N)qOJ&X)%*nT)*Q5Ju+QJ0x6Qmby z;r&Pbx5p8KtGVdH!hxbaZVd@%Zp-Z>i#RzaMt3Zk?ecC@2dnP^2*SH8@WqL&nRr^F z0)CFA+=D#irtTeCENX^9YU4y0k=Z(y+RSE*P{^>&Fv2Dqqv6be*F;&kRep5SRqI(2 zP`AT&JK5F7s8+8ze@*O&-Id!`tkGirle;N#m)21Ao$8&GAz0!xF|XFW2ZgvT`(jI4Ul4J%*-l${<|bNjE8gjd3Ogo2yUB4*Qy)Or~IB}0cXCool8c?CNj-SJI94s zs;8|aBd(|Dq&amca14V7I$aX9tA^SPvXB7#kJkkmiCKin zv>J}2Ju*5W4t3HUGDHASPXoXRV!4zS{biOf;KC#$0JX?O0fjMhXOr71nQx?qBf8z} zDYcC=fbgNM$Qjb}Pmx20LY!-sbd%ut6bSx^jf%A&%R1=N_6R_b=5xXG163kRpl9O? zaMMt6KyVK*OM}#f?$^!&ErC9O7KGTwu1X+O;Kwk~fFIVEqWnb8910|S;6TaMriLYA ztQ`;P0LQV<@Lokr%sY|a0o=$E3J3e_R~ZO7R03w3UB?Fr@K!^w2MWt3Y1GlDVYSq{ z=&*Kt7#sBm$1Dtzno;sD!*mrbLEFOqPAwtxoC!1tqWQR{FTz}(8O}h7(MhMgLL)Y_ z5uWOSPbL4X_%-MwzTd~5#{%!R!X=-7k+q>A^o9;z zEY=Sqs4x_-iOP!%h23KLDCa8ss8&!emBjM^QSn`n>V_MHfDWa zT!7bh@9FM&-U&|JLOx~_8~%B@6rZ4$)$G`6MvjZd&WpI^)pi6@?Ldn!UO8g=-jPf3JE5;@Xl()c*0&$oL zM8*_@%N~(5F!QgyC}0$kSE1zFNDofBGn(C%qtFb;fMPI4FpV5Z z!_&FThopZjxxwnIB|eYQAg%;_m>}Bb<4Ars5^a8qX`uxwk5^m$m0*q9vet0#X6sN- zZIBSXi!w9eB|0`khc%`m0jyyc%YR_g&mRD!GX!zg(mI8}QN3p=vn;jr;o|S$`bcRG z_VPO5MIu9jbZZW39b|LAQ&TLBPom5vko&%`mb25Ebcx)+E-zw%J=CBUBE!Hy2+WHe z37X{8i6bN4meTB2Rn4o_HRDS|1o)mx$vIP5iCmL&aWU2FWD12lwc4VVS;C;aY6B)p z@do`kT^j*AD{*~;A^d&wm|Y0HP1nE<++d&TQh`n;KN|RPSx>XTV9vlQ?9geDRTY&0ZsAe)zi6Kn0qXLt zo6V<~{lvmQ$^uE$veOFJ-bzxTIi1o;Ki++KWIwYjDB?kll zjR%z3$CfY`_V`U37Boi149mEXPvRz$8_;5m$yuMa)&+C+IR8|sUxBtce zj<0D{A*KN8Nqxh@020_3UP#1PDw-(4(Sh^md=Osa$-ep!dv7VA-X4RpD z*M!_C^`BvhK!81>p*Wxt=vVc6Yezz*MHD`BPwB&%q^>@YExv-QLOB0xs2bFo=&K4` zae5$H3?$bM&uXxY*lXOc>C-lIJ0Xv3%s}{uOf>rDX2`}A%!Juf>pYITv~P#9oFMyZ25pc>d7K~w z!TRO%Ogglj_&3h}KTba<{#DS+D0rD=G5PFe^)yS)QlbnZ&E(+5`8?&rzvx@2FpNba K4Ww*vgYZ9LZfni} literal 10416 zcmV;hC{NcyT4*^jL0KkKS*b9ScmQ4$f589$|NsC0|Nj5~|Iokh|L{Nn01@CjzfYub z_oF@l?f?KD`=4H^W{cM~!Gm)1^)B>TTa(lWp!<$Q>GWBbyo|tL^CTo+=8V zKmaL1L_XqY2;AKrRnbyq>z4DuT=HVsxQk<}+piaTwMNwUdoHfJGi6Gop?21+ZLo6N z7jAaO)3dwVx*o8Di&QJF(y`Xz5|K0sf?+47CYl3Dqb5n}ru|J*X+0sMCe$7yQ%xS4 zgUHHyjUJF1PnZn zus<`;f9w5_KGCo4AU|{i?<#@$k^Z0`&ZvAyhxL#4Dt~AX_Y3if@&J6G{)B%@pD+ja zfNvC@gHDZ#@kBNfCdNg4Bu7&scoH5Df-+zvU1=guV zVK89~DoKMFOa=@X!;DB0CJYV-i=13sX4JGbVpy#uWr1O$yG15p94s`k7Fnwn37KNR zF(U?&2J5Vy;?QMK6JH$YKbk3u{#k@t9>QGpK?Ykpym=rkZRa)3a{rbc%Ozn5wPX!xOmU z;xv+7q=f1k33im~6plOEwW_)o_6*6{9VU{bfLcfkCAiy3Cffm$T#`u}g#`)-001PZ zt|jGR8JQ`t97wgPafog-l1WC{B$7x329OCPi6&Jf5FnyL0mPDRx2EAFm`WfO8*Rqh zdb_+QGcz+Y2~0Bc-xlSxi*q5l1jErFbYW!3yw)5Op;7V9f^(X*(j1qNh3tL zZOSB@B@%AqZf!{tRFb5TAS6fvOp$;l#sLX2Km#O_NdUrRl0;8`Uu{(%LVaiG{UNlo z|1R-}YV6JZZ*Is2qHG&oQm5_Vuz=qfU}FeC*Ng>>konMQ{5D;7b<8lrK-YJfN@+&0n0>0u*DFipU}Hd9B9SFou`i!RZH;o4^Ho9W(Th~q2PScT38i; zT6})OCAYnKZAS<}W@({d*M;dFu$Y~@0fE3ehce58a!A9&G!B?F^`VX$y9Ce}q1wn4 z7J)S^wV@=}n1utKsWf=*Sb1?dwALDh)oi*7povWJWqDR!9>a_U@p_Yx-Gg5MS@7`b z17W`4kYI8knR}>|!!Ya@ZUIRmJwF#Zh`ji3mbZSiseweFPW6fX23Wna7)gq+6~?Fm z#6zmAsS^nkL>NR1L2`RyC~sMlUidB%Fxn_#G@)D_aa<>$ZyaRM%Thg#RT&g1cSa?I z3{}ciwD2|a${hA`BA!}hz+=ll!OGLUbB#`f>2!!J0>qWk_1v!nAZSb((*lFQ_V2&5 zrnq4OSioA7fYeA8zi)BO$g-R2gH#vC39N@*%onr@Dg=^t#sxFj&3ad}1}&qR_A(-Gqph>o~vH4&2+Lm-`M%S-Fh z@g6v*go4j03B-cn%E_c2KA3rU&e}q0=NLAJP|QqZnc47#r=%-b0k?~!=J=tI>lG28 zs$m4Il@BMOH+WY(AW5?VNN|xltOSb20l7IfvKbFcA#AoCTTM7{(r>D@?H>8UVB>|@ zaNoQg+%=1;^cn%cWLYE;QbY{{&F#{7Nq`~ap76wqL+7RNdMVojEE23q@nYM2ajXG^ zv2TqAdS<&O6+R4B)x*)mx8OZ7F9gq^&b@Zpv~c?=LZa+cVdE2$&IZSZbVS1WEX0nm zl?~-8_zS58Nl58B0$mc)vbhdpEEvL{7`Bus1G0$6W}NbzJZUs9A0U;mSDsk^Exd+9 zC>_Vx5L;g)q&k}BmZ)h0RT-X97uy5qJkzBf1*^!3Y%IQvGY2=}6UrT-hVpMJo1Miz zsXG9n(VH2}BzWN0We9I!0G4CA)DLm<6|tFTW5ONns;rEy3VfaY6f6e)!c8j*Ym0I`wlx|-?(Y#yd1 z%IYcV*_)1q3|gkZVh3^ym#+6YA=Y)#nA4jAyuy&N8fCjXdbBBl%982PCKA-ElKR?` z!$%I`wJDj_kv~9IX-wSI?09)K>vbhbaDBRm@*YnRsGeQ8unvy8s}cm-ZU$Et@)tan;`#RqYv&LJAU* z--50<(Q`M89mq!&g88yR%K?CR=rr1fryxW$0AdPlvy7=$_X?;j6)Qw!AsA-OXfdB) z4Dm#@64&9$8^!Di+>!i2Gsh>MwwVb}ED9t#x2tsEDEfMyxO_=v60M#WHP2>RLDWJj zzAgcgiUh#l9H}W4r>jPzs4|xpA_vI?xC{ttDi98W2a2T7;R2zTN1ZzsY`h-J<=un_705miO`E~7&4FG0 z_%R1D3M3Jn&coSU;HAQX*!mg*gt{x%5!dB-{?TvC?8r@mM^$&^LxhScBErP2Mf`KnD-o$+XbTqZM?wZQxMED6VG+RtvZNlUz;Y`ZXH*-@ zGeJPj>0DTbmukZgf|JT$vkGAWwyi)mfN^K6QMewSmtdWeJ(JSX`KQhW^HV%Cwv>rV zes<;YjvU2UYgwcayh?KKnqH{tW_i8fo77%{VFn zEwp;+kPVzZ&$ zjISH7F}Bkb{#!FS&phUL%+e~VktI~gGcf@bQXWutj768(CZ;@jj)dOy9oUph$~url zB9VQQoO$BR;)M|k6htT@Ac8Xt1Q9&Rf#X8xC5@U&WXP(y2#9n+1P&M$xV)i{J}aJH z8RMjGZ%QhvsFxaMJ^+q<4x|`^5OmYna4as-eouW13n^^EF=|%_8f|Gf$gz;sjyRZU zQAlA=Mrxd5Ye|X~hK=Gq4%L;ow*J$59A~ov!q<)Ps(kp2#;bhu+;1k=lCzwMh=_KN zDFlwQ3z_rgFKXXB`7bl>PTshl@+q+Pq(?=3<`Oa{y zG-NV05UNoqf>LRf!r)9p=5ef49^!Bg#jBBw3d7qhs4?%-gjRZwPCJaLQDKXL z1D=m0roUdWRso zO*Uv-p@wD-&BRA{bm`Nr)q`^0E(md>(g5E+xE3!-dJhZQUi=+2%tp!DYL9AREz*ql zEmdCTVj0mmV(*_M#x%uKxc(A|rA16z)b_8i5fB-cz5}kOFEf<1t>oIeXuBmStYX

+q2H0o;>K@Oe^o38oWte!3mO#Pm|b9*43e znWz(2lJZu=M8gVU1i`}FV8If_6j4Do z!?%`*Y`&v!dJ;@Q1Vj#@r>Vy%(@~{y?(OA`SH%~5vokWv*xR>wI0Hnq#}^YOOeaAw z!v$c$Sj?DY$wND%*N*&WoU-()tJe%Fm{1rylkz{Tf1;ol`5))m#Qp$Yr_n<``y18&KIJLCQ z?f|t1rjMRDL@v;67aAXf-iBPlX!h68a;up97GLh^`AsKfs(&w)Djg@fABGFn?Fuy>1trg>j_=)|iLjde zMz036x!r)vSRA}G+Cer>f- zuN@O^U$U$_%as7z`v*>%)~^ipbR*;Pb021c$sK>Nq3AqXCtska5O9qHqrhD7VrBY#sP~4+}KKetxBdb|M@Wkg47l4HI!fJUc49bRY zYBeplDM4FlBM4%&RB2ed42o3s)^_sEK?x9D;}4=Cq(fJ4*0JqSgq8Nu?`pMd4?ySVY+(TT9+p8kg-oH?7L^j(?QW>G53FN_g<9Z>e)xMwr zxIsOJ${74@R2|~MLm1;|HhGj600#vJ&!D1G%10|}*L5A;)jrl|`L~rp(kqA`U(`_U zO{fcu<>`LzjOT@zNlP5>JEvwBL!)Y`qbq_igc-uZ6#B|T7n(ka<^ zxMC_d+8-&;EkH}>#k;eT8c&0HiO7;ch(-iUkY>i8f-)1C%Qry0OL39J;ydXdXgblRCnmC>e-Cy zdi5A>poRqFxxTkgR^1NYd*JZD#iyl~aC^>rY{@`1V#AWE&alVDQq4mqRyVIr zmbJ+c^iDon6_7aZh5P0HjwI^2g@b!u+=XGo54ViERkIpn%YW74eUAi99NqsWWryfi)w6Ce49+f9y9WfrRIs@#75d?39mD zf-=39%;xh7u=UaQdC(t1q*3#WSVb%|P!P&MGer?xa5{W4UR=M;{PxnxTtV(9Me?2T zZjdv=!2Fb*0ZfhlO%=XD)9&v2?Ez$5MhYRi^)f^>1W-GYbnBoR?7m#ACbEbjIjMpu zb3ivmL)H4UBhVy2P@`~9vExbd5<>wq@}0_F?~@$cD(~v~tSTM;iV%B{f_a8A0ZNbx zh#}c8PRYu_`o5YTsE$2UKn{LVi^&ms;W|=?=&Yv~Az_oiKLKKndMXq|UTAFm8djl@ z^4nj1f7AJW<$YD&_>Y_XK2!W_AJqP#u7x6u`Qjhwek1&T;Dny>O@XuA55|b)_ETrl z#KqWxfPF}N&v6ih2Ov<)w($B;c(0P~ugAE_vK>$)VI&9LiwF5~A=qXcf+7&np+UrL zU`kjF=3EkWDE;3B+y4RNJ_nx4l|?62MaEs-dO()Y-C1rV-&Xu@}^4; zxd3fBopf&RFjxkSlTKkKVJ7Dy7-)1@7a5tq;q??S=Q_b)P67ePhL~Ouc1;)R;axdk zYSNH0Ed?nQwPI{iRwIQ-IV4IFJY+!7DjE>U+Af4w>4T~nK+RCJHhtySE>nr$u5|`O zaEM}20+oZTXe=*$ON?|A+0CB*=f`D^+ zzdvu~s;`5?UEQkfk^vG00lzZvvICk)BSHm>5Y`&R`n0S9+=7sR5p4T`ZWl|}pk_D| ztmNeegm#{>^BRM31v`v-=#UB%$I$RC)QN;c;0&o$=wn2pH_iD6w5>Ism@& z<0Z|X7!%~Un0UYr$yao?Z-Qoke3!&06p84{hye;MKoDRtYO^Bf24?hlf3S4);5GJZ zdCHXPsObq_4TCZg+xA4zDQxQwC38HAKsxx4!kH@FV6I_e;Snr4W4lc=5Cg^vNC5rt z7>6hZgj55ca5Raq77-i5kPqoi!jK#&S|G?WPp=G12r&{wr!+SPE%1M$p}2+=5n#Rv zkUW=x38&6o5xN|}P8%5(CY}Kz<1{S@bAmb%D{Bmt_5y0U0a*c3sUr``^%SeJ0O%Wq zE*&Wj0T}gNpoyiv_uUX)!~v2K0HQ!xs-nRI;v^zW1OPE)kRo+K5wsKoG_?c>1ON{i zHwdf7;b<_+XFoJ|8 zoTaczM9VE8T)8T6e$=#LY2DR|*w#9efY^}y*KxqbDEMlRM zec6%nJq^^s=O*>M+qaE1t!7!HH~`uXJkX=tYM5f(B@_mcGr(udnjDX{skR*J&YCt| zkqZY9(_wR1N>Y{uy8#fGm^o(F=I2^eHBie{oHNKaN=sY}P|k3*aQn*9Mbb!MfKD1} zEqoq)vQv*~JCIv|1r(RU3f8zb0M*;hcONfS+N(b zSIh)Zxu=H<3G6y4p)kFobo^arToK4NsjSJ^cRx}T1XOmbk}q^$lS8EBPecu}xYak< ziQb4qz2KfMvDEZ>#4wi~StE{)>WYT$K@(8Rpq!0?pVp<|HJUFi=y_m)Ab|7WqnK(( zh#n#)$H$-@S)eiS3Br!xa#?h-4(f-0L3x0A#pQr}j6~q`sROYU0_OgCD#ulyTTOs^ z@Kiwfpyx!crNHb}k&^)HVT_ue8zBrp4xoZSKz-Dd8VMj~4lH2Aw}PzX>#*S;f!#@@ zz|E~rQYT27k`Jq)xE2tERqueuSP(u0FG3qv6iF76CC1SB9SbLH5Xc|ON6(A#Od!^v za}3%vTk<@>0=M8d@Jx>;Md2aPH6S@8$d(sz5KfT^0D~bBNfdNL;edf;K!iXL85T$} z6=g{*7(o~yz(|lPB9aJ_mep@1>0llfbOl4ZQuWYKNfGk`PcGZdYfO=hbVVto_JKj5 z*Kxz$_P{g>`8C+|CuWF{gXaTM90CY#K^vowV}!)Qy%|#?5NpO-JDkYkfY@3h<_AUx zjau86ZCg*d(l(dkMA86h*N2Tw{194(qt9Xr0hHF(+5@mHqL2W{AFR|UM8k}gm+t`C zSCl@c`ZwC?&?+EQ65`lG1VtBjW027%le9~Uzckp5Y8D2_Zl70yaBCJ=Jk4;I60*37 zL(o_kLIS`NTwCJ^i6?rI|ZX9}E&?rKI#RiqM4NEhWv zbSMZL3{?9G(e*=T*L4ljUoH)(LXM&Eg}AV}wun^bFfVdT0??E@j1G>D%X-?=2m}-L zN|0=@cQpd>U@-+;4)BB&t%Rj8nGz(1X)47nK%;ICr7qK`qKmH1fuMoKJ{sJp*jhmy z*qj_A>jPqILy;1bp;E$%L(?9Ia4;f$OYQTFcJTpf@y2E_7O{eC3~35P6P+))jld-U z3f*g{3MviWnl_yMfv`JFjhv29Zh@IAM zoc1gC8nEx|3Y>)21wilaGkC>;f?n(Hu$X2N>p8Ar4AmtWL{qz#&k9{|rfM3)gc2dw zeAs1#z{AOueu#d|b199J7!N*eAfP4L43TV{1sQ}&OkmWW{%%Jy7a)kBViadZ-0upL z6wx467i-u7mltSn5Xht)=F8&>EcMn&hV*7d(GPNY=4wK?$qpjK2oQSW+X8JbRfIN_ z?sG$9A(#`GG&Sjh>WKtMF+l{8NrkZjWg%7`*2pmD*Y~q%TOtst3dCe!#7`_=YBx#L zrL(Sx{EC(g3<1G)F^tTah6*jX{|XfH;BQ{wn9q61#uGeZ=cQnuN6xyVweKZvcgcm< zW$j6)xx&MY5%i{3(#f1-<7G$MUhCaM@O)5wvo6%8YyKbbwX6a#R~cK)=}gh;snY@9D?i33TecerbC09AZgxHkw} zqme48umnn4XrQpCr@I>s!>Ha>al1k%Xl~6w>=bA;IbH!?sR~>?QgkFxFrs<}ED%kV zOUZW7-W}Ja0x`-9+C>1o67wOXD(@D)AW(+XftV{G0U~|S3@B_AtwIC<410e@Pq1PuzyJq>;uh@`oQC1u z50jvVyl@==#70Q4eScffq9xFu7VTX~b1NsE3Rq{zd{7n(13`W_YNdn6WiC!-L#xUx^K|A1U&HppP@_uZQXRfstFn?rIk^ZNU_e*V4NK1F zX}ko$S$MwG+N!=V1|$UMAoxg)i`M4IYh+%@7jp206&krM@EFx7xOX87 z`Pe$na^ha-?>M4w1<3=>CapuhD&e6!d^iPkf$I|hQIIP9!jy8bO?dhQtf*6-bLjx}X45Bn4v;mvJ3R+ycIyZ~*f!qW! zpwqwKSSj4%WJisT5YNmikOJn=fbzvP3y?ICf|EpqmDU6l1yB)*3qlA92o$uGv_T*m z2?%N{P*M;}6kuQ?FoM`5N(hBER+M2C>gT`9;@A{A^$u(ZFiSriljXvM_v}tIp=3Z1 zQ9&4tBk@NTi|#CK0Bkn;VPIqDhbIk{B_#<(1taFR*tU=s0h4a4zu0x4;SW?R*>XJ$ z6Wk2}P`X_xlFFc}`J!&{kog8|j+NnC&@eC=A`@r@BnSm4Pyi)Dyte~6m_&<(aOll^ zZ(qB6o1yXWYzs@poeF$}=sp7{;oRBnt&l z@XRoa>Qk;lED=COfziX&^EMcIH-qZ{mrj94r$iV8fO&<=Qy}iF@P%s{E;ue|s9G+2 zy#Q~*WSYYv$^j@qrac-^<1y)4I#Pn z#O4ar2fP;QhNO@g0YPIRG6UrbBM4(-BtyCcu-R&ZBFM4JJu?*Z+2BscXMo;pvU=c8 zC}@m3B}I`0ghnh5Qjj=Kc!8u?DiIAy(4HkFCV|Zunnzlb5zm+!F#{@A{DAg6oE=or3r$T)uh2AEE5N%=)k4|gBBlO{Wx~%$QBPc2$ouq7!mkNUGlUF zbPT}*Y0B&&&?gmu$yAgf78H;rBQO-L-Bo*l=?mm%eWJ1JQ@TVi zf{D>vtPnIP_D5T3*wWnld@r+r?b73uJ84m+QjpzxN&+XF*f$hlZ%AV#RWJv1C<6k4 zy1Q?F15HMatwp=KIq<664m{1FqjSFZFS0aExm1W!#@QJNI!h*83RiA2?&u0krqfW0|CE3Nhn1C&}Gl# z6g&*YQsLDFx2O%EZ3B39E@BImGQtE&-H@&&#=vmo8bf-CM%WmDD})a8oWK$}lg-%_ zc%tkLEP{u#rZh{63nGGt6IzexE?R0=p#V6C%26N%R0a1O97A;qP0kI%IziOcy?e7z z3Aj7Z$HHvYRVu=58`1dDoP|3ktCSPGwPCr zYu|d95)2_7C$Os^i1|UFAqE9zbFkdRMuoP4s@D5s=RDsILyXsl5T{tD9@mICN_C-X af)eY-hu!r7lmDcj{x0N-aG@bmVJ7fT1e-1Z From 8b41618f48e67917f6806a62a881cab5fe1a6a2e Mon Sep 17 00:00:00 2001 From: Peter Owen Date: Tue, 15 Aug 2023 16:28:17 +1000 Subject: [PATCH 2/5] update data descriptions --- R/data_descriptions.R | 29 ++++++++++++++--------------- man/anzsic2006.Rd | 13 ++++++++----- 2 files changed, 22 insertions(+), 20 deletions(-) diff --git a/R/data_descriptions.R b/R/data_descriptions.R index 956f922..bde8aa3 100644 --- a/R/data_descriptions.R +++ b/R/data_descriptions.R @@ -21,10 +21,10 @@ "anzsco2009" -#' ANZSCO 2019 +#' ANZSCO 2013 #' #' Wide table containing all levels of the Australian and New Zealand Standard -#' Classification of Occupations (ANZSCO), Version 1.3, 2019 +#' Classification of Occupations (ANZSCO), Version 1.2, 2013 #' #' @format A \code{tibble} with 11 variables: #' \describe{ @@ -41,14 +41,13 @@ #' \item{\code{skill_level}}{Skill level required for occupation, determined by the ABS (1 is highest, 5 is lowest). #' See \url{https://www.abs.gov.au/ausstats/abs@.nsf/Previousproducts/C4BECE1704987586CA257089001A9181 } for details.} #' } -"anzsco2019" - +"anzsco2013" -#' ANZSCO 2013 +#' ANZSCO 2019 #' #' Wide table containing all levels of the Australian and New Zealand Standard -#' Classification of Occupations (ANZSCO), Version 1.2, 2013 +#' Classification of Occupations (ANZSCO), Version 1.3, 2019 #' #' @format A \code{tibble} with 11 variables: #' \describe{ @@ -65,7 +64,8 @@ #' \item{\code{skill_level}}{Skill level required for occupation, determined by the ABS (1 is highest, 5 is lowest). #' See \url{https://www.abs.gov.au/ausstats/abs@.nsf/Previousproducts/C4BECE1704987586CA257089001A9181 } for details.} #' } -"anzsco2013" +"anzsco2019" + #' ANZSCO 2021 #' @@ -89,6 +89,7 @@ #' } "anzsco2021" + #' ANZSCO 2022 #' #' Wide table containing all levels of the Australian and New Zealand Standard @@ -113,28 +114,26 @@ "anzsco2022" -#' ANZSIC +#' ANZSIC 2006 #' #' Wide table containing all levels of the Australian and New Zealand Standard -#' Industrial Classification (ANZSIC), 2006 (Revision 1.0). Cat. 1292.0. +#' Industrial Classification (ANZSIC), 2006 (Revision 2.0). Cat. 1292.0. #' #' @format A \code{tibble} with 8 variables: #' \describe{ #' \item{\code{anzsic_division_code}}{ANZSIC division codes character, e.g. "A", "B"} #' \item{\code{anzsic_division}}{ANZSIC division title, e.g. "Agriculture, Forestry and Fishing"} -#' \item{\code{anzsic_subdivision_code}}{ANZSIC subdivision codes integer, e.g. 1, 2} +#' \item{\code{anzsic_subdivision_code}}{ANZSIC subdivision codes 2-digit character, e.g. 01, 02} #' \item{\code{anzsic_subdivision}}{ANZSIC subdivision title, e.g. "Agriculture"} -#' \item{\code{anzsic_group_code}}{ANZSIC group codes integer, e.g. 11, 12} +#' \item{\code{anzsic_group_code}}{ANZSIC group codes 3-digit character, e.g. 011, 012} #' \item{\code{anzsic_group}}{ANZSIC group title, e.g. "Mushroom and Vegetable Growing"} -#' \item{\code{anzsic_class_code}}{ANZSIC class codes integer, e.g. 111, 112} +#' \item{\code{anzsic_class_code}}{ANZSIC class codes 4-digit character, e.g. 0111, 0112} #' \item{\code{anzsic_class}}{ANZSIC class title, e.g. "Vegetable Growing (Under Cover)"} #' } +#' @source \url{https://www.abs.gov.au/statistics/classifications/australian-and-new-zealand-standard-industrial-classification-anzsic/2006-revision-2-0/numbering-system-and-titles/division-subdivision-group-and-class-codes-and-titles} "anzsic2006" - - - #' ASCED Field of Education #' #' Wide table containing all levels of fields of education in the Australian diff --git a/man/anzsic2006.Rd b/man/anzsic2006.Rd index ae39f00..7e04123 100644 --- a/man/anzsic2006.Rd +++ b/man/anzsic2006.Rd @@ -3,25 +3,28 @@ \docType{data} \name{anzsic2006} \alias{anzsic2006} -\title{ANZSIC} +\title{ANZSIC 2006} \format{ A \code{tibble} with 8 variables: \describe{ \item{\code{anzsic_division_code}}{ANZSIC division codes character, e.g. "A", "B"} \item{\code{anzsic_division}}{ANZSIC division title, e.g. "Agriculture, Forestry and Fishing"} -\item{\code{anzsic_subdivision_code}}{ANZSIC subdivision codes integer, e.g. 1, 2} +\item{\code{anzsic_subdivision_code}}{ANZSIC subdivision codes 2-digit character, e.g. 01, 02} \item{\code{anzsic_subdivision}}{ANZSIC subdivision title, e.g. "Agriculture"} -\item{\code{anzsic_group_code}}{ANZSIC group codes integer, e.g. 11, 12} +\item{\code{anzsic_group_code}}{ANZSIC group codes 3-digit character, e.g. 011, 012} \item{\code{anzsic_group}}{ANZSIC group title, e.g. "Mushroom and Vegetable Growing"} -\item{\code{anzsic_class_code}}{ANZSIC class codes integer, e.g. 111, 112} +\item{\code{anzsic_class_code}}{ANZSIC class codes 4-digit character, e.g. 0111, 0112} \item{\code{anzsic_class}}{ANZSIC class title, e.g. "Vegetable Growing (Under Cover)"} } } +\source{ +\url{https://www.abs.gov.au/statistics/classifications/australian-and-new-zealand-standard-industrial-classification-anzsic/2006-revision-2-0/numbering-system-and-titles/division-subdivision-group-and-class-codes-and-titles} +} \usage{ anzsic2006 } \description{ Wide table containing all levels of the Australian and New Zealand Standard -Industrial Classification (ANZSIC), 2006 (Revision 1.0). Cat. 1292.0. +Industrial Classification (ANZSIC), 2006 (Revision 2.0). Cat. 1292.0. } \keyword{datasets} From 9a4b7c61958b22c8eb8d027a6bd0ea9ec31fc704 Mon Sep 17 00:00:00 2001 From: peteowen1 Date: Wed, 16 Aug 2023 16:13:15 +1000 Subject: [PATCH 3/5] Update README.md update ANZSIC reference to revision 2.0 --- README.md | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/README.md b/README.md index bd4adea..addaa82 100644 --- a/README.md +++ b/README.md @@ -60,7 +60,7 @@ Current structures stored in `strayr` are: - Australian and New Zealand Standard Industrial Classification (**ANZSIC**), Cat. 1292.0: - `anzsic2006`: industry levels of ANZSIC, [2006 (Revision - 1.0)](https://www.abs.gov.au/ausstats/abs@.nsf/0/20C5B5A4F46DF95BCA25711F00146D75?opendocument). + 2.0)](https://www.abs.gov.au/statistics/classifications/australian-and-new-zealand-standard-industrial-classification-anzsic/latest-release). - Australian Standard Classification of Education (**ASCED**), Cat. 1272.0: - `asced_foe2001`: field of education levels of ASCED, From 5eff127ee9a0f90040442f07f94b142627534f1e Mon Sep 17 00:00:00 2001 From: Peter Owen Date: Thu, 17 Aug 2023 14:51:47 +1000 Subject: [PATCH 4/5] update readme and pkgdown --- README.Rmd | 2 +- README.md | 2 +- pkgdown/_pkgdown.yml | 2 ++ 3 files changed, 4 insertions(+), 2 deletions(-) diff --git a/README.Rmd b/README.Rmd index 5442f96..f7d19bf 100644 --- a/README.Rmd +++ b/README.Rmd @@ -69,7 +69,7 @@ Current structures stored in `strayr` are: - `anzsco2013`: occupation levels of ANZSCO, [2013, Version 1.2](https://www.abs.gov.au/AUSSTATS/abs@.nsf/allprimarymainfeatures/4AF138F6DB4FFD4BCA2571E200096BAD?opendocument). - `anzsco2009`: occupation levels ANZSCO, [First Edition, Revision 1, 2009](https://www.abs.gov.au/AUSSTATS/abs@.nsf/DetailsPage/1220.0First%20Edition,%20Revision%201?OpenDocument). - Australian and New Zealand Standard Industrial Classification (**ANZSIC**), Cat. 1292.0: - - `anzsic2006`: industry levels of ANZSIC, [2006 (Revision 1.0)](https://www.abs.gov.au/ausstats/abs@.nsf/0/20C5B5A4F46DF95BCA25711F00146D75?opendocument). + - `anzsic2006`: industry levels of ANZSIC, [2006 (Revision 2.0)](https://www.abs.gov.au/statistics/classifications/australian-and-new-zealand-standard-industrial-classification-anzsic/2006-revision-2-0). - Australian Standard Classification of Education (**ASCED**), Cat. 1272.0: - `asced_foe2001`: field of education levels of ASCED, [2001](https://www.abs.gov.au/ausstats/abs@.nsf/mf/1272.0). - `asced_qual2001`: qualification levels of ASCED, [2001](https://www.abs.gov.au/ausstats/abs@.nsf/mf/1272.0). diff --git a/README.md b/README.md index addaa82..6cea119 100644 --- a/README.md +++ b/README.md @@ -60,7 +60,7 @@ Current structures stored in `strayr` are: - Australian and New Zealand Standard Industrial Classification (**ANZSIC**), Cat. 1292.0: - `anzsic2006`: industry levels of ANZSIC, [2006 (Revision - 2.0)](https://www.abs.gov.au/statistics/classifications/australian-and-new-zealand-standard-industrial-classification-anzsic/latest-release). + 2.0)](https://www.abs.gov.au/statistics/classifications/australian-and-new-zealand-standard-industrial-classification-anzsic/2006-revision-2-0). - Australian Standard Classification of Education (**ASCED**), Cat. 1272.0: - `asced_foe2001`: field of education levels of ASCED, diff --git a/pkgdown/_pkgdown.yml b/pkgdown/_pkgdown.yml index c29a864..48b0d6d 100644 --- a/pkgdown/_pkgdown.yml +++ b/pkgdown/_pkgdown.yml @@ -27,6 +27,7 @@ reference: - starts_with("asced") - starts_with("asc") - auholidays + - school_terms - title: "Importing ABS Data" desc: > Functions for retrieving ABS data @@ -34,6 +35,7 @@ reference: - read_absmap - get_seifa - get_seifa_index_sheet + - read_correspondence_tbl - title: "Helper functions" desc: > Functions for cleaning data and working with datasets From 79f3a7aa03e3830cd546ca9bc3850ae76dec2818 Mon Sep 17 00:00:00 2001 From: Will Mackey Date: Thu, 17 Aug 2023 20:20:51 +1000 Subject: [PATCH 5/5] update NEWS, add to DESCRIPTION --- DESCRIPTION | 3 ++- NEWS.md | 1 + 2 files changed, 3 insertions(+), 1 deletion(-) diff --git a/DESCRIPTION b/DESCRIPTION index 7f6f178..d4268c6 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -11,7 +11,8 @@ Authors@R: c(person("Will", "Mackey", email = "wfmackey@gmail.com", role = c("au person("Benjamin", "Wee", role = c("aut")), person("Carlos", "Yanez", role = "ctb"), person("Bas", "Latcham", role = "ctb"), - person("Rex", "Parsons", role = "ctb", comment = c(ORCID = "0000-0002-6053-8174")) + person("Rex", "Parsons", role = "ctb", comment = c(ORCID = "0000-0002-6053-8174")), + person("Pete", "Owen", role = "ctb") ) Maintainer: Will Mackey License: GPL-3 diff --git a/NEWS.md b/NEWS.md index b774e6c..a161519 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,6 +1,7 @@ # strayr (development version) * `create read_correspondence_tbl()` reads correspondence tables from `absmapsdata` similarly to `read_absmap()` +* updated `anzsco2006` to include leading zeros in codes (see ). This is a backwards incompatible change that may cause issues (not enough for a major version progression) # strayr 0.2.2 * `anzsco2022` updated to reflect changes made by the ABS