correct_r_dich function

Correct correlations for artificial dichotomization of one or both variables