[r] Selecting only numeric columns from a data frame