pickseis24: Pick zooms on 24 hour display

In RSEIS: Seismic Time Series Analysis Tools

Pick zooms on 24 hour display

Description

Pick zooms on 24 hour display.

Usage

pickseis24(pjj, DB, usta, ucomp)

Arguments

pjj	output of plotseis24
DB	Database of seismic trace meta data
usta	stations to extract
ucomp	components to extract

Details

Use only 2 clicks on the plotseis24 display.

Value

Graphical Side effects. Program starts swig

Author(s)

Jonathan M. Lees<[e-mail]>

See Also

swig, winseis24 , plotseis24 , getseis24

Examples

## Not run: 

dev.new(width=8, height=12)
dev.new(width=12, height=8)

dev.set(2)
usta <- "CAL"
acomp <- "V"
JJ <- getseis24(DB, 2009, 2, usta, acomp, kind = 1)
pjj <- plotseis24(JJ, dy=1/18, FIX=24, SCALE=1, FILT=list(ON=FALSE,
fl=0.05 , fh=20.0, type="BP", proto="BU"), RCOLS=c(rgb(0.2, .2, 1),
rgb(.2, .2, .2))  )

ucomp <- c("V", "N", "E", "I")

pickseis24(pjj, DB, usta, ucomp )



## End(Not run)

RSEIS documentation built on Aug. 19, 2023, 5:07 p.m.