Merge pull request #6 from hugovk/patch-1

Plot as a map
marcusvolz · Dec 30, 2017 · 0d4a4bf · 0d4a4bf
2 parents a868e1c + f624afd
commit 0d4a4bf
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/R/plot_map.R b/R/plot_map.R
@@ -17,7 +17,7 @@ plot_map <- function(data, lon_min = 0, lon_max = Inf, lat_min = 0, lat_max = In
     ggplot2::geom_path(ggplot2::aes(lon, lat, group = id),
               data %>% dplyr::filter(lon > lon_min, lon < lon_max, lat > lat_min, lat < lat_max),
               alpha = 0.3, size = 0.3, lineend = "round") +
-    ggplot2::coord_equal() +
+    ggplot2::coord_map() +
     ggplot2::theme_void()
 
   # Return plot

diff --git a/README.md b/README.md
@@ -38,7 +38,7 @@ Create artistic visualisations with your Strava exercise data
 ### Install the packages
 
 ```R
-install.packages(c("tidyverse", "devtools"))
+install.packages(c("devtools", "mapproj", "tidyverse"))
 devtools::install_github("marcusvolz/strava")
 ```