missed a delete

joshuaulrich · May 27, 2022 · 000dab2 · 000dab2
1 parent 5b1ea2e
commit 000dab2
Showing 1 changed file with 1 addition and 7 deletions.
diff --git a/R/plot.R b/R/plot.R
@@ -317,13 +317,7 @@ plot.xts <- function(x,
       # set the ylim based on all the data if this is not a multi.panel plot
       yrange <- range(cs$Env$xdata[subset], na.rm=TRUE)
     }
-    if(isTRUE(all.equal(yrange[1L], yrange[2L]))) {
-      if(yrange[1L] == 0) {
-        yrange <- yrange + c(-1, 1)
-      } else {
-        yrange <- c(0.8, 1.2) * yrange[1L]
-      }
-    }
+
     cs$set_ylim(list(structure(.perturbConstant(yrange), fixed=FALSE)))
     cs$Env$constant_ylim <- range(cs$Env$xdata[subset], na.rm=TRUE)
   } else {