错误二进制运算符的非数字参数

Question

我想绘制一组多项式的误差图。我的命令行如下：

W=function(x){(x^2 - 4*x + 3)*exp(1)^((x*log(x))/2)}
Z=function(x){7*x^3 - 40*x^2 + 69*x -36}
plot(abs(W-Z))

然后我收到错误。

Answer 1

要绘制函数，必须在一组点上进行评估。简单地做W-Z试图从另一个中减去一个函数对象，这是没有意义的，因此就是错误。您可以简单地定义一个序列来评估函数并绘制绝对差异。例如，

x <- seq(1, 100, 0.1)

plot(abs(W(x) - Z(x)))

请注意，由于您只向plot()提供了一个参数，因此默认的x轴标签将为Index。要更改它，您可以使用xlab=参数，如下所示：

plot(abs(W(x) - Z(x)), xlab="x")

现在x轴标签将为“x”。有关绘图选项的更多信息，请使用plot查看?plot的文档。