drop debug statements

zhaoxiaohe · Oct 13, 2017 · 4d25390 · 4d25390
1 parent b8ed06f
commit 4d25390
Showing 1 changed file with 0 additions and 5 deletions.
diff --git a/R/geom_eye.R b/R/geom_eye.R
@@ -171,9 +171,6 @@ GeomDensityOrViolin <- ggproto("GeomDensityOrViolin", Geom,
     grouping_columns = names(data) %>%
       intersect(c("colour", "fill", "linetype", "group", "x"))
 
-    print(grouping_columns)
-    print(summary(data))
-
     grobs = data %>%
       dlply(grouping_columns, function(d) {
         # Find the points for the line to go all the way around
@@ -199,8 +196,6 @@ GeomDensityOrViolin <- ggproto("GeomDensityOrViolin", Geom,
         )
       })
 
-    print(str(grobs))
-
     # this is a slightly hackish approach to getting the draw order correct for the common
     # use case of fit lines / curves: draw the ribbons in order from largest mean width to
     # smallest mean width, so that the widest intervals are on the bottom.