# NOT RUN {
data(voters)
predict_race(voters, surname.only = TRUE)
predict_race(voter.file = voters, surname.only = TRUE)
# }
# NOT RUN {
predict_race(voter.file = voters, census.geo = "tract", census.key = "...")
# }
# NOT RUN {
predict_race(voter.file = voters, census.geo = "tract", census.key = "...", age = T)
# }
# NOT RUN {
predict_race(voter.file = voters, census.geo = "place", census.key = "...", sex = T)
# }
# NOT RUN {
CensusObj <- get_census_data("...", state = c("NY", "DC", "NJ"));
predict_race(voter.file = voters, census.geo = "tract", census.data = CensusObj, party = "PID")
# }
# NOT RUN {
CensusObj2 <- get_census_data(key = "...", state = c("NY", "DC", "NJ"), age = T, sex = T);
predict_race(voter.file = voters, census.geo = "tract", census.data = CensusObj2, age = T, sex = T)
# }
# NOT RUN {
CensusObj3 <- get_census_data(key = "...", state = c("NY", "DC", "NJ"), census.geo = "place");
predict_race(voter.file = voters, census.geo = "place", census.data = CensusObj3)
# }
Run the code above in your browser using DataLab