legitWPX: Legitimate Pix

View source: R/legitWPX.R

legitWPXR Documentation

Legitimate Pix

Description

Check WPX list for legitimate picks

Usage

legitWPX(twpx, quiet=TRUE)

Arguments

twpx

pick information list (WPX)

quiet

logical, default=TRUE, FALSE generates an error message

Details

Used internall to test if a WPX list has legitimate picks. Initially a list is generated with NA and 0 values in the place holders. If no legitimate picks are added, the list still exists, but the picks are bogus, so this routine will return 0.

Value

integer: 0=not legitimate, 1=legitimate

Note

Currently only the name is tested for all(NA), but this might be changed int he future for a more sophisticated test.

Author(s)

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

See Also

PCsaveWPX

Examples


###  test fails

library(RSEIS)
jk = RSEIS::cleanWPX()
legitWPX(jk)

####  test passes:
data(GH, package='RSEIS')
gwpx = RSEIS::uwpfile2ypx(GH$pickfile)

legitWPX(gwpx)



Rquake documentation built on June 22, 2024, 11:54 a.m.