R(SGS)运行时基于Kriging的仿真

时间:2018-10-03 09:25:50

标签: r

我正在尝试使用“ gstat”程序包中的R krige函数来运行顺序高斯模拟。我有315分,以下是我使用的代码。我在学习区域的坐标范围内制作了一个规则网格。我的常规网格分辨率为32 m,观察点距离约为500米 我的问题是运行时间需要多长时间?我已经开始运行它8天了,但红色的停止按钮仍然亮着。 谢谢

G<- as.data.frame(XX)
# XX is my regular grid
gridded(G)= ~X + Y
coordinates(claycal1)= ~x + y
m<- autofitVariogram(Clay.L1~1, claycal1)
plot(m)
mm<- vgm(37, "Ste", 569, 20)
Sim1<- krige(claycal1$Clay.L1 ~1, claycal1, 
skCcal1, model = mm, nsim = 1, indicators = FALSE)

0 个答案:

没有答案