From 3d61c3a93b3031937f5d3a4e8b53e7f65b28af3b Mon Sep 17 00:00:00 2001 From: Thomas Knecht Date: Tue, 3 Sep 2019 09:26:32 +0200 Subject: [PATCH] Delete emtpy rows --- R/position-nudgestack.R | 4 ---- 1 file changed, 4 deletions(-) diff --git a/R/position-nudgestack.R b/R/position-nudgestack.R index f978593441..60e67169dd 100644 --- a/R/position-nudgestack.R +++ b/R/position-nudgestack.R @@ -29,8 +29,6 @@ position_nudgestack <- function(x = 0, y = 0, vjust = 1, reverse = FALSE) { ) } - - #' @rdname ggplot2-ggproto #' @format NULL #' @usage NULL @@ -99,8 +97,6 @@ PositionNudgeStack <- ggproto("PositionNudgeStack", Position, data <- rbind(neg, pos)[match(seq_len(nrow(data)), c(which(negative), which(!negative))), ] - - # transform only the dimensions for which non-zero nudging is requested if (any(params$x != 0)) { if (any(params$y != 0)) {