自動マッピングを実行しようとしています。不確実性がアイソラインで表示される不確実性マップが必要です。これらのアイソラインとそれに関連付けられた値をエクスポートし、Web マップ サービスを介して表示したいと考えています。出来ますか?次のコードにより、等高線を生成できます
require(gstat)
require(lattice)
data(meuse)
data(meuse.grid)
coordinates(meuse) = ~x+y
gridded(meuse.grid) = ~x+y
m <- vgm(.59, "Sph", 874, .04)
# ordinary kriging:
x <- krige(log(zinc)~1, meuse, meuse.grid, model = m)
l=as.data.frame(x)
contourplot(var1.var ~ x+y,data=l,cuts=10)