if (FALSE) {
rpath = system.file("extdata",package="rtop")
observations = readOGR(rpath,"observations")
observations$obs = observations$QSUMMER_OB/observations$AREASQKM
# Create the sample variogram
rtopVario = rtopVariogram(observations, params = list(cloud = TRUE))
plot(rtopVario)
}
Run the code above in your browser using DataLab