# NOT RUN {
library(shiny)
library(plotly)
library(tidyverse)
# for comparing labor/liberal
launch_app(
election_year = 2016,
age = c("Age20_24", "Age25_34", "Age55_64"),
religion = c("Christianity", "Catholic", "NoReligion"),
other = c("AusCitizen", "MedianPersonalIncome", "Unemployed")
)
# for inspecting highly contested areas
launch_app(
election_year = 2016,
age = c("Age25_34", "Age35_44", "Age55_64"),
religion = c("Christianity", "Catholic", "NoReligion"),
other = c("Owned", "Indigenous", "AusCitizen")
)
launch_app()
# }
Run the code above in your browser using DataLab