Property Tax Fairness
From the Center for Municipal Finance

To generate the report, first Download Data.This dataset is a cleaned public dataset we can use.

After downloading the dataset, please run the below R code, for example in RStudio. Remember to replace “your output directory” with the path where you want to save the generated report.

library(tidyverse)

library(readstata13)
library(cmfproperty)

df <- read.dta13(“STL_County_Merge.dta”)

df <- df %>% filter(property_type == “R”)

df <- df %>% mutate(SALE_PRICE = SalePrice, SALE_YEAR = SaleYear, TAX_YEAR = Year, ASSESSED_VALUE = final_assessed_value)

df <- df[c(‘SALE_PRICE’, ‘SALE_YEAR’, ‘TAX_YEAR’, ‘ASSESSED_VALUE’)]

ratios <- cmfproperty::reformat_data(df, sale_col = “SALE_PRICE”, assessment_col = “ASSESSED_VALUE”, sale_year_col = “SALE_YEAR”)

cmfproperty::make_report(ratios, jurisdiction_name = “St. Louis County”, output_dir = “your output directory”) 

Below is a pre-generated example report:

Report