some r sweave fix