wd <- webdata('prism')
wg <- webgeom('state::New Hampshire')
wp <- webprocess()
if (FALSE) {
if(!any(is.null(wp), is.null(wg), is.null(wd))) {
gj <- geojob()
xml(gj) <- XML(wg, wd, wp)
url(gj) <- url(wp)
}
gj <- start(gj)
gj <- cancel(gj)
}
Run the code above in your browser using DataLab