我想为一组多项式绘制一个错误图。我的命令行如下:
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))
然后我得到一个错误。
我想为一组多项式绘制一个错误图。我的命令行如下:
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))
然后我得到一个错误。
要绘制函数,必须在一组点上对其进行评估。简单地做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
.