Tweak stroke example

Author: hadley

R/geom-point-.r

@@ -82,9 +82,11 @@
 #' d + geom_point(alpha = 1/20)
 #' d + geom_point(alpha = 1/100)
 #'
-#' # Using shapes with a border
-#' p <- ggplot(mtcars, aes(wt, mpg))
-#' p + geom_point(shape=21, size=5, colour='black', fill='white', stroke=4)
+#' # For shapes that have a border (like 21), you can colour the inside and
+#' # outside separately. Use the stroke aesthetic to modify the width of the
+#' # border
+#' ggplot(mtcars, aes(wt, mpg)) +
+#'   geom_point(shape = 21, size = 5, colour = "black", fill = "white", stroke = 5)
 #'
 #' # You can create interesting shapes by layering multiple points of
 #' # different sizes

man/geom_point.Rd

@@ -95,9 +95,11 @@ d + geom_point(alpha = 1/10)
 d + geom_point(alpha = 1/20)
 d + geom_point(alpha = 1/100)
 
-# Using shapes with a border
-p <- ggplot(mtcars, aes(wt, mpg))
-p + geom_point(shape=21, size=5, colour='black', fill='white', stroke=4)
+# For shapes that have a border (like 21), you can colour the inside and
+# outside separately. Use the stroke aesthetic to modify the width of the
+# border
+ggplot(mtcars, aes(wt, mpg)) +
+  geom_point(shape = 21, size = 5, colour = "black", fill = "white", stroke = 5)
 
 # You can create interesting shapes by layering multiple points of
 # different sizes