R to constants.gas_constant