R中的图形函数？

Question

因此，我能够使用R中的plot()函数来绘制不同的函数。然而，我发现R中的图形通常不会显示函数的整个曲线。让我举个例子：

    fun <- function(x){
        x^3 + 2*x^2 + 3*x + 4
      }
    plot(fun)

​

​

但是，当我使用Desmos Graphing Calculator绘制同一函数时，它会显示笛卡尔图的所有四个象限，而R只显示一个象限：

​

​

我的问题是:如何修改RPlot以显示所有四个象限，而不是像上面这样只显示一个象限？

Answer 1

我认为你可以通过扩展默认范围(0，1)来做到这一点：

plot(fun,from=-5,to=5,ylim=c(-8,8),col="red")
grid()
abline(v=0,h=0,lty=2)

我添加了一些装饰，使它看起来更像所需的情节。在y轴上添加一个点很容易；添加x-intercept就不是那么容易了。

points(0,fun(0),pch=16)
points(Re(polyroot(c(4,3,2,1))[2]),0,pch=16)