R编程"Col="red"“绘图错误

Question

我正在尝试在R中绘制一张图，获得给定值的绘制部分是正确的，我得到了这个：plot without color

使用以下代码：

g<- function(x,y)
  + x**2+y**2-3*x+y+2
gb<- function(x) g(x[1],x[2])
x <- seq(-2,2,len=51)
y <- seq(-2,2,len=51)
gz<-outer(x,y,g)
contour(x,y,gz)
polygon(c(0,0,1),c(1,2,1))

但是当我想用下面的代码给多边形添加颜色时：

 g<- function(x,y)
  + x**2+y**2-3*x+y+2
gb<- function(x) g(x[1],x[2])
x <- seq(-2,2,len=51)
y <- seq(-2,2,len=51)
gz<-outer(x,y,g)
contour(x,y,gz)
polygon(c(0,0,1),c(1,2,1),
        + col="red",
        +density=c(30,40))

我得到以下错误：

Error: unexpected '=' in:
"polygon(c(0,0,1),c(1,2,1),
        + col="

我的程序中唯一使用的包是: library(mosaicCalc)

Answer 1

错误消息告诉您polygon()中的某个地方有一些错误，所以这就是我们要关注的内容。

你粘贴了：

polygon(c(0,0,1),c(1,2,1),
    + col="red",
    +density=c(30,40))

，它与

polygon(c(0,0,1),c(1,2,1), + col="red", +density=c(30,40))

+不应该在那里，他们导致了错误。使用

polygon(c(0,0,1),c(1,2,1), col="red", density=c(30,40))

你应该会好起来的。

旁注:您似乎从某个地方复制粘贴了这段代码，然后在自己运行它时遇到了这个错误。如果有人从控制台复制代码，如果多行代码属于同一语句，则通常会包含一个+。正如你现在学到的，你应该在运行代码之前删除它们。