Merge pull request #311 from lindsaycarr/master

axis: n.minor use auto axis ticks if "at" hasn't been user-specified
USGS-R · Feb 22, 2016 · 21368af · 21368af
2 parents f845477 + bc9fa59
commit 21368af
Showing 1 changed file with 10 additions and 2 deletions.
diff --git a/R/axis.R b/R/axis.R
@@ -96,8 +96,16 @@ draw_axis <- function(gsplot, index.axis) {
     } else {
       axis(axisParams)
       n.minor <- n.minor + 1
-      #Minor axis:
-      at <- axTicks(axisParams$side)
+
+      # Minor axis:
+
+      #if user hasn't specified "at", calculate it
+      if(is.null(axisParams$at)){
+        at <- axTicks(axisParams$side)
+      } else {
+        at <- axisParams$at
+      }
+
       newAT <- c()
 
       if(axisParams$side %% 2 == 0){