add range backtransformation function. closes tidyverse#2820.

wilkelab · Aug 22, 2018 · 58e425b · 58e425b
1 parent 02f11e8
commit 58e425b
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/R/sf.R b/R/sf.R
@@ -353,6 +353,10 @@ CoordSf <- ggproto("CoordSf", CoordCartesian,
     )
   },
 
+  backtransform_range = function(panel_params) {
+    list(x = panel_params$x_range, y = panel_params$y_range)
+  },
+
   # CoordSf enforces a fixed aspect ratio -> axes cannot be changed freely under faceting
   is_free = function() FALSE,