提取变异函数模型的拟合值

Extracting fitted values of a variogram model

如何提取变异函数模型的拟合值(不是参数!)?我打算在Excel软件中绘制理论变异函数。

我使用gstat包中的fit.variogram如下:

library(sp)
data(meuse)
coordinates(meuse) = ~x+y
vgm1 <- variogram(log(zinc)~1, meuse)
fit.variogram(vgm1, vgm(1, "Sph", 300, 1))
fit.variogram(vgm1, vgm("Sph")) 

我需要在 R 中的 plot 函数中使用的数据集。

gstat 中有函数 variogramLine(空间 vgm)和 variogramSurface(时空 vgm),它们将针对提供的一组距离评估 vgm 模型。