Update DataSlicing.R