Older collected income data for LCBC collected income information in 7 bins. Newer data collects continuous income data. This function converts binned income data from these 7 categories into the mean income value for each bin.
income_bin2nok(x)
income bin vector
numeric
x <- c("< 200k", "600k - 699k", "400k - 499k",
"> 700k", "500k - 599k", "300k - 399k",
"200k - 299k")
income_bin2nok(x)
#> [1] 100000 650000 450000 800000 550000 350000 100000