Update tableone.R