Shrink R code chunk widths