title: How do I create equal angles in this hex grid in R?
body: <p>I've created a hex grid over the city of Alexandria, VA with unequal angles in R. I'd like for all angles within the grid to equal the same value. How could I fix the code to return a nicer grid. Thanks. </p>
  
  <pre><code>study_area &lt;- getData("GADM", 
                        country = "USA", 
                        level = 2) 
  
  virginia &lt;- study_area[study_area$NAME_1 =="Virginia", ]  
  alexandria &lt;- virginia[virginia$NAME_2 == "Alexandria", ]
  
  plot(alexandria, col = "grey50", bg = "light blue", axes = TRUE)
  text(-77.13,38.85,"Study Area:\nAlexandria")
  
  size &lt;- 0.0025
  hex_points &lt;- spsample(alexandria, type = "hexagonal", cellsize = size)
  hex_grid &lt;- HexPoints2SpatialPolygons(hex_points, dx = size)
  plot(alexandria, col = "grey50", bg = "light blue", axes = TRUE)
  plot(hex_points, col = "black", pch = 20, cex = 0.5, add = T)
  plot(hex_grid, border = "orange", add = T)
  </code></pre>
  
  <p>I understand this may be projection issue, which I'm not great with in R. Projection of hex grid reads, "+proj=longlat +datum=WGS84 +no_defs +ellps=WGS84 +towgs84=0,0,0"</p>
  
  <p><a href="https://github.com/Bikingman/Transportation_Planning/blob/master/Rplot01.png" rel="nofollow noreferrer">https://github.com/Bikingman/Transportation_Planning/blob/master/Rplot01.png</a></p>