powered by
surf.gls
expcov(r, d, alpha = 0, se = 1) gaucov(r, d, alpha = 0, se = 1) sphercov(r, d, alpha = 0, se = 1, D = 2)
data(topo, package="MASS") topo.kr <- surf.ls(2, topo) correlogram(topo.kr, 25) d <- seq(0, 7, 0.1) lines(d, expcov(d, 0.7))
Run the code above in your browser using DataLab