library(GeoModels)
# Define the spatial-coordinates of the points:
x <- runif(100, 0, 2)
y <- runif(100, 0, 2)
coords=cbind(x,y)
matrix1 <- GeoCovmatrix(coordx=coords, corrmodel="GenWend", param=list(smooth=0,
power2=4,sill=1,scale=0.2,nugget=0))
GeoCovDisplay(matrix1)
Run the code above in your browser using DataLab