fit<-Krig(ozone$x, ozone$y,exp.cov, theta=200)
# fitting a surface to ozone
# measurements
set.panel( 2,2)
plot(fit)
fit<-sreg(rat.diet$t,rat.diet$con)
# fit rat data
set.panel(2,2)
plot(fit)
set.panel(1,1) # reset graphics window.Run the code above in your browser using DataLab