Add a function in knitr to run example

[cderv]

At some point I'd like to move the whole thing to an internal function knitr:::knit_example, so that we only need to call Rscript -e "knitr:::knit_example() in the shell script and powerscript.

Originally posted by @yihui in #82 (review)