diff --git a/code/plot2018pr.r b/code/plot2018pr.r index 01fda45..07104fc 100644 --- a/code/plot2018pr.r +++ b/code/plot2018pr.r @@ -1013,7 +1013,7 @@ summary(pr.se$camloneg[pr.se$camloneg<0]) summary(pr.se$cprineg[pr.se$cprineg<0]) summary(pr.se$cpanneg[pr.se$cpanneg<0]) -edon <- 9 +edon <- 11 edo <- edos[edon] estado <- c("Aguascalientes","Baja California","Baja California Sur","Campeche","Coahuila","Colima","Chiapas","Chihuahua","Ciudad de México","Durango","Guanajuato","Guerrero","Hidalgo","Jalisco","México","Michoacán","Morelos","Nayarit","Nuevo León","Oaxaca","Puebla","Querétaro","Quintana Roo","San Luis Potosí","Sinaloa","Sonora","Tabasco","Tamaulipas","Tlacala","Veracruz","Yucatán","Zacatecas")[edon] @@ -1221,4 +1221,7 @@ yl <- tmp.ranges[4] - (tmp.ranges[4] - tmp.ranges[3])*.95 text(xl, yl, labels = "Preparado por Eric Magar con datos del INE (ericmagar.com)", col = "lightgray", pos = 4, cex = .65) dev.off() +# Export to javascript + + diff --git a/graph/nytPlusPan-gua.pdf b/graph/nytPlusPan-gua.pdf index f73c31a..1310be5 100644 Binary files a/graph/nytPlusPan-gua.pdf and b/graph/nytPlusPan-gua.pdf differ diff --git a/graph/nytPlusPan-gua.png b/graph/nytPlusPan-gua.png index 182bc66..b796d10 100644 Binary files a/graph/nytPlusPan-gua.png and b/graph/nytPlusPan-gua.png differ