changing the eicwidth parameter of export.class.table.R function