UW pickfile to pphase pick data.frame
Read in ASCII version of pickfile. This is the output list used to plot picks on swig, often called WPX or YPX in other functions.
uwpfile2ypx(P)
P |
pickfile |
list:
STAS |
input structure |
yr |
year |
mo |
month |
dom |
day of month |
jd |
julian day |
hr |
hour |
mi |
minute |
sec |
second |
col |
color |
onoff |
logical, TRUE plot trace |
Jonathan M. Lees<jonathan.lees.edu>
data("GH")
WW = RSEIS::uwpfile2ypx(GH$pickfile)
vertord <- getvertsorder(GH$pickfile, GH)
R1 = rangedatetime(WW)
R2 = rangedatetime(GH$info)
S1 = secdifL(R2$min, R1$min)
swig(GH, sel=vertord$sel, APIX=WW, WIN=c(S1-1, 15) , SHOWONLY=0)Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.