RSEIS (version 3.7-4)

replaceWPX: 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

Value

WPX list

Details

Replaces one pick at index provided.

See Also

addWPX, catWPX, deleteWPX, selWPX

Examples

# NOT RUN {
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)

# }