Learn R Programming

pscl (version 1.4.6)

AustralianElectionPolling: Political opinion polls in Australia, 2004-07

Description

The results of 239 published opinion polls measuring vote intentions (1st preference vote intention in a House of Representatives election) between the 2004 and 2007 Australian Federal elections, from 4 survey houses.

Usage

data(AustralianElectionPolling)

Arguments

source

See the source variable. Andrea Abel assisted with the data collection.

Details

Morgan uses two modes: phone and face-to-face.

The 2004 Australian election was on October 9; the ALP won 37.6% of the 1st preferences cast in elections for the House of Representatives. The ALP won the 2007 election (November 24) with 43.4% of 1st preferences.

The ALP changed leaders twice in the 2004-07 inter-election period spanned by these data: (1) Mark Latham resigned the ALP leadership on January 18 2005 and was replaced by Kim Beazley; (2) Beazley lost the ALP leadership to Kevin Rudd on December 4, 2006.

The then Prime Minister, John Howard, announced the November 2007 election on October 14, 2007.

References

Jackman, Simon. 2009. Bayesian Analysis for the Social Sciences. Wiley: Hoboken, New Jersey. Example 9.3.

Examples

Run this code
data(AustralianElectionPolling)
xyplot(ALP ~ startDate | org, 
       data=AustralianElectionPolling,
       layout=c(1,5),
       type="b",
       xlab="Start Date",
       ylab="ALP")

## test for house effects
library(gam)
y <- AustralianElectionPolling$ALP/100
v <- y*(1-y)/AustralianElectionPolling$sampleSize
w <- 1/v
m1 <- gam(y ~ lo(startDate,span=1/10),
          weight=w,	      
          data=AustralianElectionPolling)
m2 <- update(m1, ~ . + org)
anova(m1,m2)

Run the code above in your browser using DataLab