更新R逻辑回归