Adds a blank layer to a ggplot to extend one axis symmetrically about 0 for all facets.
symmetrise_scale(p, axis = "x")
ggplot2
axis
plot with scales adjusted
# NOT RUN { library(ggplot2) p1 <- qplot(mpg, wt, data=mtcars, colour=cyl) + facet_wrap(~carb, nrow=1, scales='free') symmetrise_scale(p1, 'y') # }
Run the code above in your browser using DataLab