Deleting Data setup.R