Fix RPM distribution amounts #4
Description
PINs within the special RPM TIF district have slightly incorrect total tax amounts, especially compared to non-TIF PINS. The RPM TIF has the following disbursement:
- CPS gets its normal revenue as if the RPM TIF doesn't exist
- 80% of the remaining TIF funds go to the RPM project
- 20% of the remaining TIF funds are redistributed back to the jurisdiction except CPS
The first two are correct, but calculating the correct proportional distribution for part 3 is challenging. Currently using the following formula: agency_tax_rate / sum(agency_tax_rate (excluding CPS))
The following script yields the example data below:
left_join(
tax_bill(2019, "14081020190000", simplify = FALSE),
ptaxsim::sample_tax_bills_detail %>%
filter(pin == "14081020190000") %>%
select(pin, tax, agency),
by = c("pin", "agency")
) %>%
select(
agency_name, tax_amt_calced = tax_amt_final, tax_amt_real = tax
)# A tibble: 10 x 3
agency_name tax_amt_calced tax_amt_real
<chr> <dbl> <dbl>
1 COUNTY OF COOK 606. 624.
2 FOREST PRESERVE DISTRICT OF COOK COUNTY 78.8 78.4
3 CITY OF CHICAGO 2141. 2131.
4 CITY OF CHICAGO LIBRARY FUND 162. 161.
5 CITY OF CHICAGO SCHOOL BLDG & IMP FUND 226. 225.
6 CHICAGO COMMUNITY COLLEGE DISTRICT 508 199. 198.
7 BOARD OF EDUCATION 4561. 4560.
8 CHICAGO PARK DISTRICT 435. 433.
9 CHICAGO PARK DIST. AQUARIUM & MUSEUM BONDS 0 0
10 METRO WATER RECLAMATION DIST OF GR CHGO 520. 517.