# NOT RUN {
# MAP <- gadm_loadCountries("BEL", level = 3, simplify=0.01)
# DAT = read.csv2("BE_clamydia_incidence.csv")
# DAT <- rename(DAT, NAME_3 = district)
# fast.choropleth(MAP, DAT,
# adm.join = "NAME_3",
# value = "rate03",
# steps = 4,
# breaks = "jenks",
# palette="Greens",
# legend = "Incidence",
# title="Chlamydia incidence by Belgian district (2003)")
# }
Run the code above in your browser using DataLab