replaceWPX {RSEIS}

Replace picks in WPX file

Description

Replace pick in WPX file

Usage

replaceWPX(WPX, onepx , ind=1)

Arguments

WPX

WPX list

onepx

WPX list with one pick

ind

integer, index to replace

Details

Replaces one pick at index provided.

Value

WPX list

Note

Replaces in the location provided. No test is made to determine if there is a pick already there. Maybe future versions will allow multiple replacements.

Author(s)

Jonathan M. Lees<[e-mail]>

See Also

addWPX, catWPX, deleteWPX, selWPX

Examples

s1 <- setWPX(name="HI", yr=2011, jd=231, hr=4, mi=3, sec = runif(5)) 
s2 <- setWPX(name="HI", yr=2011, jd=231, hr=4, mi=3, sec = runif(1)) 


s4 <- replaceWPX(s1,s2, ind=4)