add comments to sweave loop