Newtown-Raphson算法 R