getting and cleaning data in R