huber loss regression r