Manually fixed output for R code chunk

Due to quirks in R's substitute() combined with how knitr converts .Rmd
to .md, the R output was "incorrect". So I changed {r} to {r, eval =
FALSE} and manually inserted the desired output as a comment.

Also: my prior commit incorrectly noted that lines 439-445 needed
changes. Should instead be lines 431-434.