R fixed try