Data Preparation in R