Update Rstudio-Sweave-sample-document.Rnw