# NOT RUN {
# }
# NOT RUN {
data(GH)
swig(GH, sel=which(GH$COMPS=="V" ))
jh = WINGH(GH, sel = which(GH$COMPS=="V" ), WIN = c(3.821281, 12.861820) )
swig(jh)
## compare with:
swig(GH, sel=which(GH$COMPS=="V" ), WIN = c(3.821281, 12.861820))
# }
Run the code above in your browser using DataLab