在R中绘制圆环上的坐标数据

Question

我从模型（N​​etLogo）导入坐标数据并尝试在R中绘制它。在NetLogo模型中，区域的大小为221 x 221圆环，最大x和y值为110和最小x和y值也是110.

我的代码用于绘制数据，网格区域并提取每个补丁的点数如下：

x<-c(1:50)
y<-c(1:50)

plot(x, y, pch = 16, xlim=c(-110,110), ylim=c(-110,110))

grid(110,110,lty=1)

xt<-cut(x,seq(-110,110,1))
yt<-cut(y,seq(-110,110,1))

count<-as.vector(table(xt,yt))
table(count)

但是当我这样做时，显然会给我补丁的数量为48400.如何正确设置值，使其为48841（即221 x 221）？

Answer 1

-2，-1,0,1,2 5个对象意味着4个区间，因此该图具有（221-1）^ 2个补丁。