# NOT RUN {
# plot
# }
# NOT RUN {
library(fields)
data(USprecip)
par(mfcol=c(2,1))
quilt.plot(USprecip[,1:2],USprecip[,3])
US( add=TRUE, col=2, lty=2)
quilt.plot(USprecip[,1:2],USprecip[,4])
US( add=TRUE, col=2, lty=2)
# }
Run the code above in your browser using DataLab