2015-11-05 90 views
2

因此,我可以使用R中的plot()函數來繪製不同的函數。但是,我發現R中的圖形通常不會顯示函數的整個曲線。讓我用一個例子:R中的圖形函數?

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

Image in RPlot: x^3 + 2x^2 + 3x + 4

然而,當我使用鷹爪圖形計算器它顯示的笛卡爾圖表,而R的所有四個象限繪製相同的功能,只顯示一個:

Image in Desmos: x^3 + 2x^2 + 3x + 4

我的問題:如何修改RPlot以顯示所有四個象限,而不是像上面的情況那樣只顯示一個象限?

回答

4

我想你可以通過擴展默認範圍內做到這一點(這是[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)