r - 像 Wolframalpha 网站上那样绘制多项式函数，以便于理解

Question

在 Wolfram-alpha-网站 中绘制函数如下所示:

http://www.wolframalpha.com/link

在 R 中绘制相同的函数如下所示:

绘图(函数(x)x^2 - 3*x - 10 )

Wolfram 的默认绘图更容易理解。我认为这是因为它显示了 x 轴(在 y=0 处)，并将抛物线居中。

我的数学能力不够好，无法只看函数的公式并看看应该在哪里居中绘图，并且我正在绘制函数以了解不同的函数如何创建不同的线，所以我需要这个居中自动完成，否则我可能会误解情节。

是否可以自动创建 Wolfram 图，即无需我告诉 R 将图置于中心位置是明智的？

Answer 1

polynom 包将创建一些合理的默认值。

例如。

library(polynom)

# your polynomial (coefficients in ascending powers of x order)
p <- polynomial(c(-10,-3,1))
plot(p)

 # a more complicated example, a polynomial crossing the x axis at -1,0,1,2,3,4,5

 p2 <- poly.calc(-1:5)
 p2 
 # -120*x + 154*x^2 + 49*x^3 - 140*x^4 + 70*x^5 - 14*x^6 + x^7 
 plot(p2)