Skip to content

Instantly share code, notes, and snippets.

#small multiples
ggplot(data=data, aes(x=Elec, y=Dif, fill=Color))
+ geom_bar(stat="identity")
+ labs(x="", y="")
+ theme(legend.position="none", panel.background=element_rect(fill="white"), panel.grid.major.x=element_blank(), panel.grid.major.y= element_line(colour="#969696", size=0), panel.grid.minor = element_line(colour="grey78", size=0), panel.border = element_rect(colour="black", fill=NA, size=0), strip.background = element_rect(fill="#ffffff"), strip.text = element_text(size=8, hjust=0, face="bold"), axis.title = element_text(size=9), plot.title=element_text(size=13, face="bold"), axis.text.x=element_text(size=7, angle = 90, hjust=1, vjust=0.5), axis.text.y=element_text(size=7))
+ scale_y_continuous(limits=c(-100,100), breaks=seq(-100,100,25))
+ scale_x_continuous(breaks=seq(1979,2015, 4))
+ facet_wrap(~Subzona, ncol=5)
+ scale_fill_manual(values=c("#bf812d", "#35978f"))
Elec Subzona Const2 Nac2 Val Cons Nac Dif Color
1979 Alto Bidasoa 1298 1482 2876 45.13 51.53 -6.40 nac
1979 Aoiz 985 630 2084 47.26 30.23 17.03 const
1979 Auñamendi 1211 1149 3158 38.35 36.38 1.96 const
1979 Barranca 4801 4458 10102 47.53 44.13 3.40 const
1979 Baztan 2319 1778 4214 55.03 42.19 12.84 const
1979 Cinco Villas 1892 2658 4645 40.73 57.22 -16.49 nac
1979 Cuenca de Pamplona 57870 35296 102988 56.19 34.27 21.92 const
1979 Estella Occidental 2987 685 4198 71.15 16.32 54.84 const
1979 Estella Oriental 10448 4712 17524 59.62 26.89 32.73 const
@urnavarra
urnavarra / Post-electoral 1 - Sheet1.csv
Created October 16, 2015 00:54
Encuesta post-electoral CIS 2015
Respuesta Todos PP PSOE Podemos Ciudadanos IU UPN Gbai Bildu Otros
Estado centralista 4 0.17 0.33 0 0.17 0.17 1.85 0 0 1.32
Menos autonomía 4.4 0.84 0.33 0.33 0.33 0 1.52 0 0 1.05
CCAA igual 45.5 1.17 6.21 5.37 1.18 0.17 9.39 3.02 1.33 17.66
CCAA más autonomía 22.1 0.17 1.34 3.36 0.33 0.84 0.84 6.04 2.68 6.51
Reconocimiento autodeterminación 15.8 0 0.33 1.17 0 0.34 0.33 2.86 7.89 2.88
Respuesta Todos PP PSOE Podemos Ciudadanos IU UPN Gbai Bildu
Estado centralista 4 7.1 3.6 0 6.7 8.3 12.8 0 0
@urnavarra
urnavarra / splitcolors.csv
Created June 7, 2015 17:29
Split-ticket vote
municipio partido voto tipo pamplona split
Pamplona Geroa Bai 17.91 aut si green
Pamplona UPN 30.03 aut si red
Pamplona PSN 9.82 aut si red
Pamplona Bildu 13.34 aut si red
Pamplona IE 3.75 aut si red
Pamplona PP 3.87 aut si green
Pamplona Podemos 13.79 aut si green
Pamplona Geroa Bai 15.74 loc si green
Pamplona UPN 30.99 loc si red
@urnavarra
urnavarra / partidos2.csv
Created May 25, 2015 23:59
Resultados históricos partidos
Partido Voto Year Tipo
UPN 16.06 1979 partidos
PSN 19.02 1979 partidos
HBEHBildu 11.12 1979 partidos
PNV 5.06 1979 partidos
UPN 23.51 1983 partidos
PSN 35.87 1983 partidos
PP 14.22 1983 partidos
HBEHBildu 10.62 1983 partidos
PNV 6.88 1983 partidos
@urnavarra
urnavarra / partidos.csv
Created May 10, 2015 18:32
DosNavarras_partidos
Partido Voto Year Tipo
UPN 16.06 1979 partidos
PSN 19.02 1979 partidos
PP NA 1979 partidos
UCDCDS 26.8 1979 partidos
HBEHBildu 11.12 1979 partidos
PNV 5.06 1979 partidos
EA NA 1979 partidos
PCIU NA 1979 partidos
Merindad 6.81 1979 partidos
@urnavarra
urnavarra / NA919911.csv
Created May 10, 2015 18:29
DosNavarras
ID_0 ISO NAME_0 ID_1 NAME_1 ID_2 NAME_2 ID_3 NAME_3 ID_4 NAME_4 VARNAME_4 TYPE_4 ENGTYPE_4 NA919911_N NA919911_E NA919911_C NA919911_M NA919911_1 NA919911_P NA919911_2 NA919911_A NA919911_V NA919911_B NA919911_3 NA919911_U NA919911_4 NA919911_5 NA919911_6 NA919911_7 NA919911_8 NA919911_9 NA919911_I NA91991110 NA91991111 NA91991112 NA91991113 NA91991114 NA91991115 NA91991116 NA91991117 NA91991118 NA91991119 NA919911_G NA91991120 NA91991121 NA91991122 NA91991123 NA91991124 NA91991125 NA91991126 NA91991127 NA91991128 NA91991129 NA91991130 NA91991131 NA919911_H NA91991132 NA91991133 NA91991134 NA91991135 NA91991136 NA91991137 NA91991138 NA91991139 NA91991140 NA91991141 NA91991142 NA91991143 NA91991144 NA91991145 NA91991146 NA91991147 NA91991148 NA91991149 NA91991150 NA91991151 NA91991152 NA91991153 NA91991154 NA91991155 NA91991156 NA91991157 NA91991158 NA91991159 NA91991160 NA91991161 NA91991162 NA91991163 NA91991164 NA91991165 NA91991166 NA91991167 NA91991168 NA91991169 NA91991170 NA91991171 NA91991172 NA9199117
@urnavarra
urnavarra / Encuestas - Sheet2.csv
Created May 4, 2015 23:46
Encuestas 2015 Primera Oleada
Medio Fecha UPN Bildu Geroa Bai Podemos PSN PP Ciudadanos IU-E
Onda Cero Navarra 23/03/15 22.5 17.3 7.8 13.9 10.4 9.5 7.7 6.4
Noticias de Navarra 22/03/15 24.2 14.4 15.8 16.4 13.9 5.2 3 3.3
La Razón 11/03/15 22.3 16.5 9.4 8.6 11.2 10.2 9.7 5.2
Diario de Navarra 26/04/15 26.1 13.7 17.1 14.7 10.2 6.4 5.9 3.2
@urnavarra
urnavarra / NA11.csv
Created May 2, 2015 23:16
Participación Navarra Mapa
We can make this file beautiful and searchable if this error is corrected: It looks like row 7 should actually have 25 columns, instead of 2. in line 6.
ID_4,NOMBRE,ETIQUETA,C__MUNICIP,MUNICIPIO,CENSO,PARTICIPAC,PORCENTAJE,ABSTENCI_N,V_LIDOS,BLANCO,NULOS,UPN,ECOLO,PP,PSN_PSOE,UPYD,SAIN,NA_BAI2011,CDN,IXN,BILDU,RCN_NOK,IZQ_EZK,DNE
6077.00,Abigar,Abigar,1.00,Abigar,89.00,64.00,0.72,25.00,63.00,3.00,1.00,18.00,3.00,3.00,6.00,0.00,0.00,14.00,3.00,0.00,13.00,0.00,0.00,0.00
6078.00,Abrzuza,Abrzuza/Abartzuza,2.00,Abrzuza/Abartzuza,419.00,311.00,0.74,108.00,307.00,12.00,4.00,116.00,1.00,18.00,18.00,0.00,0.00,74.00,10.00,1.00,43.00,2.00,8.00,4.00
6249.00,Abaurregaina,Abaurregaina/Abaurrea Alta,3.00,Abaurregaina/Abaurrea Alta,132.00,83.00,0.63,49.00,83.00,1.00,0.00,21.00,2.00,4.00,9.00,0.00,0.00,25.00,0.00,0.00,20.00,0.00,1.00,0.00
6250.00,Abaurrepea,Abaurrepea/Abaurrea Baja,4.00,Abaurrepea/Abaurrea Baja,38.00,23.00,0.61,15.00,23.00,1.00,0.00,14.00,0.00,0.00,1.00,0.00,0.00,4.00,0.00,0.00,3.00,0.00,0.00,0.00
6079.00,Aberin,Aberin,5.00,Aberin,304.00,193.00,0.63,111.00,191.00,10.00,2.00,62.00,2.00,21.00,26.00,0.00,1.00,28.00,3.00,0.00,21.00,2.00,15.00,0.00
6197.00,Ablitas
@urnavarra
urnavarra / PAM11NA_part.csv
Created May 2, 2015 23:12
Pamplona Participación
We can make this file beautiful and searchable if this error is corrected: Unclosed quoted field in line 9.
DIST2,Distrito,Dis,Part,VALIDOS,BLANCOS,NULOS,UPN,PP,PSN_PSOE,NA_BAI2011,BILDU,IZQ_EZK,GANADOR,UPN2,PP2,PSN2,NABAI2,BILDU2,IU2,IUPSOE,BILDUNABAI
Total 11,1_1,11,"0,6781045752",410,7,5,66,14,26,101,144,31,BILDU,"0,16","0,03","0,06","0,25","0,35","0,08",SI,BILDU
Total 13,1_3,13,"0,7029616725",794,7,13,184,26,56,181,208,97,BILDU,"0,23","0,03","0,07","0,23","0,26","0,12",SI,BILDU
Total 14,1_4,14,"0,6807580175",465,12,2,73,15,45,110,142,42,BILDU,"0,16","0,03","0,10","0,24","0,31","0,09",FALSO,BILDU
Total 15,1_5,15,"0,649122807",508,8,10,85,13,40,132,135,62,BILDU,"0,17","0,03","0,08","0,26","0,27","0,12",SI,BILDU
Total 16,1_6,16,"0,6995515695",467,9,1,158,11,19,116,91,40,UPN,"0,34","0,02","0,04","0,25","0,19","0,09",SI,NABAI
Total 17,1_7,17,"0,7113970588",384,10,3,92,21,39,84,84,37,UPN,"0,24","0,05","0,10","0,22","0,22","0,10",FALSO,NABAI
Total 18,1_8,18,"0,6790780142",378,9,5,131,28,29,60,62,34,UPN,"0,35","0,07","0,08","0,16","0,16","0,09",SI,BILDU
Total 19,1_9,19,"0,6925373134",462,8,2,110,17,34,102,101,43,UPN,"0