corr.R: correct and complete