RSEIS (version 4.2-4)

replaceWPX: Replace picks in WPX file

Description

Replace pick in WPX file

Usage

replaceWPX(WPX, onepx , ind=1)

Value

WPX list

Arguments

WPX

WPX list

onepx

WPX list with one pick

ind

integer, index to replace

Author

Jonathan M. Lees<[e-mail]>

Details

Replaces one pick at index provided.

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)