boxplotTemplate

### Boxplot of {{k}} by number of cylinders
 
```{r boxplot-by-cyl-{{j}}, eval=TRUE}
ggplot(mtcars, 
       aes(x = cyl, y = {{j}}, 
           fill = cyl)) +
    geom_boxplot() + 
    theme_bw() +
    theme(legend.position = "bottom") +
    xlab("") +
    ylab(paste(quote({{j}})))
```


### Boxplot of {{k}} by number of cylinders and transmission


```{r boxplot-by-cyl-am-{{j}}, eval=TRUE}
ggplot(mtcars, 
       aes(x = cyl, y = {{j}}, 
           fill = cyl)) +
  geom_boxplot() + 
  facet_grid(~am) + 
  theme_bw() +
  theme(legend.position = "bottom") +
  xlab("") +
  ylab(paste(quote({{j}})))
```