fixed the digits for stat.con.1 and stat.con.2 summary in tableone.R