File: BEPS.Rd

package info (click to toggle)
effects 2.0.10-1
  • links: PTS
  • area: main
  • in suites: squeeze
  • size: 308 kB
  • sloc: makefile: 3
file content (48 lines) | stat: -rw-r--r-- 1,922 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
\name{BEPS}
\alias{BEPS}
\docType{data}
\title{British Election Panel Study}
\description{
  These data are drawn from the 1997-2001 British Election Panel Study (BEPS).
}
\usage{BEPS}
\format{
  A data frame with 1525 observations on the following 10 variables.
  \describe{
    \item{\code{vote}}{Party choice: \code{Conservative}, \code{Labour}, or \code{Liberal Democrat}}
    \item{\code{age}}{in years}
    \item{\code{economic.cond.national}}{Assessment of current national economic conditions, 1 to 5.}
    \item{\code{economic.cond.household}}{Assessment of current household economic conditions, 1 to 5.}
    \item{\code{Blair}}{Assessment of the Labour leader, 1 to 5.}
    \item{\code{Hague}}{Assessment of the Conservative leader, 1 to 5.}
    \item{\code{Kennedy}}{Assessment of the leader of the Liberal Democrats, 1 to 5.}
    \item{\code{Europe}}{an 11-point scale that measures respondents' attitudes
		toward European integration. High scores represent `Eurosceptic'
		sentiment.}
    \item{\code{political.knowledge}}{Knowledge of parties' positions on European integration, 0 to 3.}
    \item{\code{gender}}{\code{female} or \code{male}.}
  }
}

\references{
  J. Fox and R. Andersen (2006)
   Effect displays  for multinomial and proportional-odds logit models.
  \emph{Sociological Methodology} \bold{36}, 225--255.
}

\examples{
summary(BEPS)

require(splines)  # for bs()
beps <- multinom(vote ~ age + gender + economic.cond.national + economic.cond.household 
	+ Blair + Hague + Kennedy + bs(Europe, 3)*political.knowledge, data=BEPS)
europe.knowledge <- effect("bs(Europe, 3)*political.knowledge", beps, 
	xlevels=list(Europe=seq(1, 11, length=50), political.knowledge=0:3),
  	given.values=c(gendermale=0.5))
  
plot(europe.knowledge)
  
plot(europe.knowledge, style="stacked", colors=c("blue", "red", "orange"), rug=FALSE)
}

\keyword{datasets}