| presid2002 {ade4} | R Documentation |
presid2002 is a list of two data frames tour1 and tour2 with 93 rows ( 93 departments from continental Metropolitan France) and,
4 and 12 variables respectively .
data(presid2002)
tour1 contains the following arguments:
the number of registered voters (inscrits); the number of abstentions (abstentions);
the number of voters (votants); the number of expressed votes (exprimes) and,
the numbers of votes for each candidate: Megret, Lepage, Gluksten, Bayrou,
Chirac, Le_Pen, Taubira, Saint.josse, Mamere, Jospin, Boutin,
Hue, Chevenement, Madelin, Besancenot.
tour2 contains the following arguments:
the number of registered voters (inscrits); the number of abstentions (abstentions);
the number of voters (votants); the number of expressed votes (exprimes) and,
the numbers of votes for each candidate: Chirac and Le_Pen.
Site of the ministry of the Inerior, of the Internal Security and of the local liberties
http://www.interieur.gouv.fr/avotreservice/elections/presid2002/
This dataset is compatible with elec88 and cnc2003
data(presid2002)
all((presid2002$tour2$Chirac + presid2002$tour2$Le_Pen) == presid2002$tour2$exprimes)
## Not run:
data(elec88)
data(cnc2003)
w1 = area.util.class(elec88$area, cnc2003$reg)
par(mfrow = c(2,2))
par(mar = c(0.1,0.1,0.1,0.1))
area.plot(w1)
w = scale(elec88$tab$Chirac)
s.value(elec88$xy, w, add.plot = TRUE)
scatterutil.sub("Chirac 1988 T1", csub = 2, "topleft")
area.plot(w1)
w = scale(presid2002$tour1$Chirac/ presid2002$tour1$exprimes)
s.value(elec88$xy, w, add.plot = TRUE)
scatterutil.sub("Chirac 2002 T1", csub = 2, "topleft")
area.plot(w1)
w = scale(elec88$tab$Mitterand)
s.value(elec88$xy, w, add.plot = TRUE)
scatterutil.sub("Mitterand 1988 T1", csub = 2, "topleft")
area.plot(w1)
w = scale(presid2002$tour2$Chirac/ presid2002$tour2$exprimes)
s.value(elec88$xy, w, add.plot = TRUE)
scatterutil.sub("Chirac 2002 T2", csub = 2, "topleft")
## End(Not run)