如何繪製填充輪廓，其中z軸是因子

Question

我有一個數據集

test<-data.frame(expand.grid(x=seq(0.01,1,0.01), y=seq(0.01,1,0.01))) 
test$z<-c(rep(1,2500),rep(2,2500),rep(3,2500),rep(4,2500)) 

（X，Y）定義笛卡爾座標。我想繪製一個填充等高線圖，其中xlim=ylim=c(0,1)，顏色是z（一個4級的因子）。

我可以這樣做：

plot(test$x, test$y, col=test$z, pch=16)，但它並不好看。

這個例子看起來很糟糕，但在我的數據是有道理的。我熟悉akima::interp和filled.contour()，但我不希望有任何插值，z不是連續的，而是一個因素。

您能否給我推薦適合我的數據的令人愉快的可視化？我更喜歡基礎圖形。

Answer 1

可以使用image例如：

image(outer(seq(0.01,1,0.01),seq(0.01,1,0.01), 
      FUN=function(x,y)test$z)) 

我認爲你可以使用raster包這樣的情節處理好。