powered by
data(HZRMeta)
data(HZRMeta) Gridxy<- spsample(HZRMeta, cellsize=2000, n=300,"regular") plot(Gridxy)
Run the code above in your browser using DataLab