posts/facet_labels_in_R.mdwn

   1 [[!meta date="2016-10-05 21:48:11 +0800"]]
   2
   3 [[!tag R graph code]]
   4 Getting used to the grammar of ggplot2 takes some time, but so far it's not been disappointing. Wanting to split a scatterplot by segment, I used `facet_grid`. That by default shows a label on each subplot, using the values in the variable by which the plot is faceted.
   5
   6 As that often isn't very descriptive in itself, there needs to be a way to re-label these subplots. That way is `as_labeller`, as shown in the example code below.
   7
   8 Example:
   9 [[!format r """
  10 ggplot(outputs, aes(x=date_var,y=value_var),alpha=0.8) +
  11   geom_point(aes(y=value_var, colour=colour_var)) +
  12   geom_smooth() +
  13   theme(legend.position = "none",axis.text.y = element_blank(),axis.text.x = element_blank()) +
  14   scale_x_date(date_breaks = '1 week') +
  15   labs(y = "Value",x = "Date", title = "Example") +
  16   scale_colour_manual("Legend",values=named_coloring_vector)) +
  17   scale_fill_manual("",values=c("grey12")) +
  18   facet_grid(. ~ Segment, labeller = as_labeller(c("yes" = "Segment A",
  19                                                           "no" = "Segment B")))
  20 """]]
  21
  22 Output:
  23 [[!img pics/2016-10-05_R-facet.png size="200x200" alt="Example plot with 2 facets labelled Segment B and Segment A"]]