R 克里格插值时空变异函数参数的选择

最近我用R做了时空插值。我选择了包gstat中的函数krigeST，它在时空数据中使用了kriging方法。 以下是我的步骤：

首先，我创建一个名为STFDF的STFDF对象：

stfdf<-stConstruct(observation,space = list(values = 1:ncol(observation)),time = Node$Time,SpatialObj = loc,interval = T)

stfdf
 var<-variogramST(values~1,data = stfdf,assumeRegular = T)
 plot(var,wireframe=T)

sepvgm<-vgmST("separable",space = vgm(0.02, "Exp", 8000, 0),time = vgm(0, "Exp", 2, 0.001),sill = 0.02)
sepvgmST<-fit.stVariogram(var,sepvgm,fit.method=6,method="L-BFGS-B")