HOW TO CALCULATE RATIOS IN R