## Not run: ------------------------------------
# # for comparing labor/liberal
# launchApp(
# age = c("Age20_24", "Age25_34", "Age55_64"),
# religion = c("Christianity", "Catholic", "NoReligion"),
# other = c("Population", "MedianIncome", "Unemployed")
# )
#
# # for inspecting highly contested areas
# launchApp(
# age = c("Age25_34"),
# religion = c("Christianity", "Catholic", "NoReligion"),
# other = c("NotOwned", "Indigenous", "Population")
# )
#
## ---------------------------------------------
Run the code above in your browser using DataLab