在R中绘制函数图形？

Question

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

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

然而，当我使用Desmos绘图计算器绘制相同函数时，它显示笛卡尔图的所有四个象限，而R仅显示一个：

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

- optimisation2810

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轴截距上添加则不太容易。

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

- Ben Bolker