Update TGR_calculator.R