prez_pwr <- structure(list(president = c("bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "bush", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama", "obama"), party = c("r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "r", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d", "d"), has_pwr = c("yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "yes", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no", "no")), row.names = c(NA, -365L), class = c("tbl_df", "tbl", "data.frame"))