R中的图形函数？

Question

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

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

然而，当我使用鹰爪图形计算器它显示的笛卡尔图表，而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截距并不是那么容易。

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