Combine Data Analysis in R