add facet tests using r cookbook for ggplot2