Update combine.R