plotJGET: Plot JGET output

In RSEIS: Seismic Time Series Analysis Tools

Plot JGET output

Description

Plot JGET output using interactive swig

Usage

plotJGET(J, SHOWONLY = FALSE)

Arguments

J	list, output of JGETseis
SHOWONLY	logical, if SHOWONLY== TRUE, no interaction

Details

Program combines prepSEIS and swig

Value

GH list ready for use in other RSEIS programs. See prepSEIS for details

Author(s)

Jonathan M. Lees<[e-mail]>

See Also

JGET.seis, prepSEIS, swig

Examples

data(GH)
 Iendian = .Platform$endian
apath = tempdir()
##  setwd(apath)
##
 Iendian = .Platform$endian
##    apath = './TEMP'
### dir.create(apath)

J =  rseis2sac(GH, sel = 1:5, path = apath, BIGLONG =FALSE )

Lname  <-  list.files(path=J , pattern='SAC', full.names=TRUE)

J  <- JGET.seis(Lname,kind=2,BIGLONG=FALSE,HEADONLY=FALSE,Iendian=Iendian,PLOT=0)

if(interactive()) { plotJGET(J) }

RSEIS documentation built on Sept. 13, 2024, 1:09 a.m.