RSEIS (version 3.7-4)

deleteWPX: Delete picks to WPX file

Description

Delete pick to WPX file

Usage

deleteWPX(WPX, ind=1)

Arguments

WPX

WPX list

ind

integer, index to delete

Value

WPX list

Details

Deletes one pick to end of list.

See Also

addWPX, catWPX

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)) 

s3 <- addWPX(s1, s2)

s4 <- deleteWPX(s3, ind=2:3)

# }