16.3 Controlling scales
facet_grid() you can control whether the position scales are the same in all panels (fixed) or allowed to vary between panels (free) with the
scales = "fixed": x and y scales are fixed across all panels.
scales = "free_x": the x scale is free, and the y scale is fixed.
scales = "free_y": the y scale is free, and the x scale is fixed.
scales = "free": x and y scales vary across panels.
facet_grid() imposes an additional constraint on the scales: all panels in a column must have the same x scale, and all panels in a row must have the same y scale. This is because each column shares an x axis, and each row shares a y axis.
Fixed scales make it easier to see patterns across panels; free scales make it easier to see patterns within panels.
ggplot(mpg2, aes(cty, hwy)) + p <- geom_abline() + geom_jitter(width = 0.1, height = 0.1) + facet_wrap(~cyl)p
+ facet_wrap(~cyl, scales = "free")p
Free scales are also useful when we want to display multiple time series that were measured on different scales. To do this, we first need to change from ‘wide’ to ‘long’ data, stacking the separate variables into a single column. An example of this is shown below with the long form of the
economics_long#> # A tibble: 2,870 x 4 #> date variable value value01 #> <date> <chr> <dbl> <dbl> #> 1 1967-07-01 pce 507. 0 #> 2 1967-08-01 pce 510. 0.000265 #> 3 1967-09-01 pce 516. 0.000762 #> 4 1967-10-01 pce 512. 0.000471 #> 5 1967-11-01 pce 517. 0.000916 #> 6 1967-12-01 pce 525. 0.00157 #> # … with 2,864 more rows ggplot(economics_long, aes(date, value)) + geom_line() + facet_wrap(~variable, scales = "free_y", ncol = 1)
facet_grid() has an additional parameter called
space, which takes the same values as
scales. When space is “free”, each column (or row) will have width (or height) proportional to the range of the scale for that column (or row). This makes the scaling equal across the whole plot: 1 cm on each panel maps to the same range of data. (This is somewhat analogous to the ‘sliced’ axis limits of lattice.) For example, if panel a had range 2 and panel b had range 4, one-third of the space would be given to a, and two-thirds to b. This is most useful for categorical scales, where we can assign space proportionally based on the number of levels in each facet, as illustrated below.
$model <- reorder(mpg2$model, mpg2$cty) mpg2$manufacturer <- reorder(mpg2$manufacturer, -mpg2$cty) mpg2ggplot(mpg2, aes(cty, model)) + geom_point() + facet_grid(manufacturer ~ ., scales = "free", space = "free") + theme(strip.text.y = element_text(angle = 0))