if (FALSE) {
# what you'd normally do
sen <- roll_call("senate", 115, 1, 110)
}
# using a saved object
sen <- readRDS(system.file("extdata", "sen.rds", package="voteogram"))
senate_carto(sen) +
theme_voteogram()
Run the code above in your browser using DataLab