powered by
ZOOM.SEISN(GH, sel = 1:length(GH$dt), WIN = NULL)
## Not run: # # data("GH") # sel <- which(GH$COMPS=="V") # # KF <- ZOOM.SEISN(GH, sel=sel, WIN = c(0 , 5) ) # # swig(KF) # ## End(Not run)
Run the code above in your browser using DataLab