Add limits to the ccdf map in the vignette.

UrbanInstitute · Nov 28, 2018 · 3297b99 · 3297b99
1 parent 8f8635e
commit 3297b99
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/vignettes/introducing-urbnmapr.Rmd b/vignettes/introducing-urbnmapr.Rmd
@@ -58,6 +58,8 @@ ccdf <- get_urbn_map(map = "territories_counties")
 ccdf %>%
   ggplot(aes(long, lat, group = group)) +
     geom_polygon(fill = "grey", color = "#ffffff", size = 0.25) +
+    scale_x_continuous(limits = c(-141, -55)) +
+    scale_y_continuous(limits = c(24, 50)) +  
     coord_map(projection = "albers", lat0 = 39, lat1 = 45)
 ```
 
@@ -99,6 +101,8 @@ ccdf %>%
     geom_polygon(aes(long, lat, group = group), 
                  fill = "grey", color = "#ffffff", size = 0.25) +
     geom_text(data = ccdf_labels, aes(long, lat, label = state_abbv), size = 3) +  
+    scale_x_continuous(limits = c(-141, -55)) +
+    scale_y_continuous(limits = c(24, 50)) +  
     coord_map(projection = "albers", lat0 = 39, lat1 = 45)
 ```