calculate_r_estimates function

Calculate Reproduction Number Estimates