sample sweave