Update corr.R

Fixed errors found upon submit().  See comments for change description.