Create split.r