# NOT RUN {
testfile <- system.file("Sweave", "Sweave-test-1.Rnw", package = "utils")
# }
# NOT RUN {
## convert the file to latex syntax
SweaveSyntConv(testfile, SweaveSyntaxLatex)
## and run it through Sweave
Sweave("Sweave-test-1.Stex")
# }
Run the code above in your browser using DataLab