make clipping configurable in coord_sf(). Closes #2938. (#2942)

Author: clauswilke

NEWS.md

@@ -53,6 +53,9 @@ This is a minor release and breaking changes have been kept to a minimum. End us
     safer to feed data columns into `aes()` or into parameters of geoms or
     stats. However, doing so remains discouraged (@clauswilke, #2694).
 
+*   `coord_sf()` now also understands the `clip` argument, just like the other
+    coords (@clauswilke, #2938).
+
 *   `fortify()` now displays a more informative error message for
     `grouped_df()` objects when dplyr is not installed (@jimhester, #2822).
 

R/sf.R

@@ -789,7 +789,7 @@ coord_sf <- function(xlim = NULL, ylim = NULL, expand = TRUE,
                      crs = NULL, datum = sf::st_crs(4326),
                      label_graticule = waiver(),
                      label_axes = waiver(),
-                     ndiscr = 100, default = FALSE) {
+                     ndiscr = 100, default = FALSE, clip = "on") {
 
   if (is.waive(label_graticule) && is.waive(label_axes)) {
     # if both `label_graticule` and `label_axes` are set to waive then we
@@ -830,7 +830,8 @@ coord_sf <- function(xlim = NULL, ylim = NULL, expand = TRUE,
     label_graticule = label_graticule,
     ndiscr = ndiscr,
     expand = expand,
-    default = default
+    default = default,
+    clip = clip
   )
 }