setwpix {RSEIS}R Documentation

Set Window Pix for PICK.GEN

Description

Create list of windows picks suitable for plotting in PICK.GEN.

Usage

setwpix(phase = NULL, col = NULL, yr = NULL, jd = NULL, hr = NULL, mi = NULL, sec = NULL, dur = NULL, name = NULL, comp = NULL, dispcomp = NULL)

Arguments

phase phase name
col color for plotting
yr year
jd julian day
hr hour
mi minute
sec second
dur duration
name name of station
comp component
dispcomp display on which component

Details

Some phases should be displayed on only certain components of a station.

Value

list of window picks

Author(s)

Jonathan M. Lees<jonathan.lees@unc.edu>

See Also

PICK.GEN

Examples


data(KH)

orgtim=c( 2005,214,7,1,10.7313152551651 )
tims=c( 0,46.7119336128235,102.438451051712,113.092049956322,123.540771961212 )
psecs = NULL
nam = NULL

aphases =NULL
sta ="9024"

for(j in 1:length(tims))
{
psecs = c(psecs, tims[j]+orgtim[5])
nam = c(nam, sta)
aphases = c(aphases, paste(sep="", "K", j) )
}

pp = setwpix(phase=aphases , col="blue", yr=orgtim[1], jd=orgtim[2],
hr=orgtim[3],  mi=orgtim[4], sec=psecs, dur=0, name=nam , comp="V")


W = secdifL(KH$info, pp)

win = c(min(W)-5, max(W)+5    )  
 PICK.GEN(KH, APIX=pp, WIN=win , SHOWONLY=TRUE)


[Package RSEIS version 2.3-3 Index]