[r] How can I get the average (mean) of selected columns