simplify calls to *apply in corr.R and complete.R