uwpfile2ypx {RSEIS}

UW pickfile to pphase pick data.frame

Description

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.

Usage

uwpfile2ypx(P)

Arguments

P

pickfile

Value

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

Author(s)

Jonathan M. Lees<jonathan.lees.edu>

Examples

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)