如何創建一個帶有網格的圓並在R中標記佔用的單元格？

Question

我將如何創建一個帶有網格的圓形，然後根據X，Y座標系統填充佔用的單元格。

我的圈子看起來像這樣（數字位置號）：

而且我已經建立了我的X，Y系統位置1爲-2,4 ... ..

感謝，

阿利薩

Answer 1

plot(5*c(1,0,-1,0), 5*c(0,1,0,-1) ,col="transparent") # set coordinate range 
abline(h=-5:5); abline(v=-5:5) # the grid 
polygon( 4.3*sin(seq(0,2*pi,length=100)), 
      4.3*cos(seq(0,2*pi,length=100))) # the circle 
abline(h=0,v=0,lwd=2) # the axes 
text(x=c((1:4)-2.5,(1:6)-3.5, (1:8)-4.5, (1:8)-4.5, #offsets to center in cells 
     (1:8)-4.5, (1:8)-4.5, (1:6)-3.5, (1:4)-2.5), 
    y=c(rep(4,4), rep(3,6), rep(2,8), rep(1,8), 
      rep(0,8), rep(-1,8), rep(-2,6), rep(-3,4))-0.5, 
    labels=1:52) 

抑制軸標籤，軸蜱，以及去除所述「突出端」是提供正確的圖形參數（xaxs，yaxs，xaxt，yaxt，xlab和ylab）到一個簡單的事情調用函數plot。也許：

..., , xaxs="i", yaxs="i", xaxt="n", yaxt="n", ylab="", xlab="") 

這會產生這樣的：