Skip to content
Snippets Groups Projects
Commit a79db0d7 authored by Ben Anderson's avatar Ben Anderson
Browse files

test n households via sum weights

parent 05fd5239
No related branches found
No related tags found
No related merge requests found
...@@ -178,3 +178,11 @@ message("N rows after removing zero weights: ", nrow(longFormDT)) ...@@ -178,3 +178,11 @@ message("N rows after removing zero weights: ", nrow(longFormDT))
# save the results for future use since they won't change unless we change the constraints ---- # save the results for future use since they won't change unless we change the constraints ----
data.table::fwrite(longFormDT, paste0(p_Params$ggPath, "/safe/ipf/nonZeroWeightsAu2013.csv")) data.table::fwrite(longFormDT, paste0(p_Params$ggPath, "/safe/ipf/nonZeroWeightsAu2013.csv"))
# final test
# sum of weights:
tidyNum(sum(longFormDT$ipfWeight))
# Census 2013:
# 1,549,890
# http://archive.stats.govt.nz/Census/2013-census/profile-and-summary-reports/qstats-families-households/households.aspx
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment