This function aggregates graphing code; returns plots as a list.
createGraphs(metric = "income")
createGraphs(1)#> [1] "invalid argument - code 0943nar9"createGraphs(0)#> [1] "invalid argument - code 0943nar9"