judgeit {JudgeIt}R Documentation

judgeit

Description

Two-party election modelling and simulation for R.

Usage


judgeit (model.formula=~1,vote.formula=NULL,same.districts=NULL,
          data,pop.groups=NULL,

          uncontesteds.method="default",uncontested.low=0.05,
          uncontested.low.new=0.25,uncontested.high=0.95,
          uncontested.high.new=0.75,

          use.last.votes=TRUE,
          simulations=201, 
          
          weight="constant", 
          years=NULL,
          
          routine=NULL,year=NULL,judgeit.object=NULL,
          ... 
          )

Arguments

model.formula The model formula; left side contains the vote outcome as one party's share of the total vote, right side contains predictors.
vote.formula The vote distribution formula. Left side contains one or two columns with actual and/or eligible turnout, right side contains the number of seats per district. ~~Describe vote.formula here~~
same.districts A vector noting whether an election had the same district map as the previous one.
data A list containing all the elections to be modelled in the system. Each item of the list should be an election variable; each election variable should be a data frame containing the information for each district.
pop.groups A formula indicating groups of subpopulations to be considered in the voting.power routine.
uncontesteds.method A choice between "nochange","default","impute" and "delete" for the way to deal with uncontested districts.
uncontested.low The value below which a district should be considered uncontested by party 1, so that party 2 wins the district's seats.
uncontested.low.new If method is "default", districts uncontested by party 1 will be considered to have this amount of the vote share for the purposes of the analysis.
uncontested.high The value above which a district should be considered uncontested by party 2.
uncontested.high.new If method is "default", districts uncontested by party 2 will be considered to have this amount of the vote share for the purposes of the analysis.
use.last.votes T/F whether a previous election's votes should be automatically included as a current election's predictor. This is overridden if the district maps are not identical due to the information in 'same.districts', or an unequal number of districts between two elections.
simulations The number of simulations of election parameters for each analysis.
weight A choice between "constant","elgvotes","actvotes" and "seats" for the type of weights used in the linear model of each election.
years A vector indicating the years considered in the analysis. This entry is redundant if the names of the entries in the data list are given as the years.
routine If desired, the routine to run in order to obtain desired quantities of interest.
year If desired, the election for which the above routine will be run.
judgeit.object If desired, a pre-existing object from which judgeit() will obtain the model.
... Extra commands to be used with model.frame(), a routine used in assembling the linear model for each year.

Value

judgeit() loads several years of electoral history into a judgeit object for further analysis.
Alternatively, judgeit() will perform the routine requested in option "routine", and the function will return a judgeit object with judgeit.object$output containing the output from the chosen routine.

Author(s)

Andrew Gelman, Gary King & Andrew C. Thomas

References

See JudgeIt website (http://gking.harvard.edu/judgeit) for more information.

Examples


#Demo files are available through the following commands:
demo(judgeit.primer)
demo(seatsdemo)
demo(probdemo)
demo(svsumdemo)
demo(distreportdemo)

data(house6311)
#columns: STATE,DIST,INC,VOTE,TURNOUT,DELSOUTH

#operators:
unc <- function(inp) -1*(inp<0.05)+1*(inp>0.95)

years <- seq (1896,1992,by=2)
same.dists <- rep(1,49); same.dists[seq(4,49,by=5)] <- 0

j.ob <- judgeit(model.formula=VOTE~unc(VOTE)+INC,vote.formula=TURNOUT~1,
               data=house6311,
               use.last.votes=T,subset=DELSOUTH==0,same.d=same.dists)

summary(j.ob)
summary(j.ob,which(years==1942))

d.rep <- district.report(j.ob,year=1962,new.covariates=list("INC",0),vote.range=c(0.1,0.9))
d.rep

#seats-votes curve
seating <- seats(j.ob,year=1986,vote.range=c(0.2,0.8))
plot(seating)


[Package JudgeIt version 1.3.3 Index]