Merge pull request #770 from wch/summary-group

Fixes for stat_summary

Author: wch

NEWS

@@ -15,6 +15,9 @@ BUG FIXES
 
 * Plots with geom_crossbar not display correct symbol in legend. (Fixes #768)
 
+* Grouping is no longer set automatically by `stat_summary()`, allowing for
+  summary paths. This reverts a change made for 0.9.3. (Fixes #732 and #739)
+
 ggplot2 0.9.3
 ----------------------------------------------------------------
 

R/stat-summary.r

@@ -136,9 +136,6 @@ StatSummary <- proto(Stat, {
       }
     }
 
-    # Each x location should be in a separate group
-    data$group <- as.integer(interaction(data$group, data$x))
-
     summarise_by_x(data, fun, ...)
   }
 

visual_test/stat-summary.r

@@ -0,0 +1,21 @@
+vcontext("stat-summary")
+
+ggplot(mtcars, aes(x = cyl, y = mpg, colour = factor(vs))) + 
+  geom_point() +
+  stat_summary(fun.y = mean, geom="line", size = 2)
+save_vtest("summary with color and lines")
+
+# It is not possible to make this behave as expected without breaking the
+# summary with color and lines, because of the way grouping works with
+# stat_summary.
+ggplot(mtcars, aes(x = cyl, y = mpg)) +
+  geom_point() +
+  stat_summary(fun.data=mean_cl_boot, colour="red", geom="crossbar", width=0.2)
+save_vtest("summary with crossbars, no grouping (looks wrong)")
+
+ggplot(mtcars, aes(x = cyl, y = mpg, group = cyl)) +
+  geom_point() +
+  stat_summary(fun.data=mean_cl_boot, colour="red", geom="crossbar", width=0.2)
+save_vtest("summary with crossbars, manual grouping")
+
+end_vcontext()