[r] Calculate correlation with cor(), only for numerical columns