A candidate, unhappy with the official election results, goes on Pox News and cliams that the election has been rigged. He claims, based on internal party polling to have the support of 70 percent of voters. You are hired by a local media outlet to investigate this claim. You have a budget to randomly sample 350 voters, and collect data on voter preference and some demographie information. The voter preference variable is a dummy variable, called vote that is equal 1 if the voter voted for this candidate, and otherwise. You hire an assistant to perform the data analysis. The data frame is called voter data. Your assistant emails you the following output: sum(voter.data$vote) ## (1) 215 model Im(vote-1, data voter.data) ## model -- Im(vote-1, data voter.data) ## coeftest(model sandwich) ## ## t test of coefficients ## ## Estimate Std. Errort value Pret ## (Intercept) 0.614286 0.026019 23.61 coeftest(model sandwich) ## ## t test of coefficients ## ## Estimate Std. Errort value Pret ## (Intercept) 0.614286 0.026019 23.61