Initial version of corr() function