Update splitData.R