Using the package animate to perform Newton Raphson Method
newton.method(FUN = function(x) x^4 + 2*x^3 -7*x^2 -x +5,tol = 0.001, interact = FALSE)