An R script to perform correlation on a data set