Added setwidth library to R startup.