Federer Recovers After Losing First Set in New York