Create corr.r