RSEIS (version 3.7-4)

plotarrivals: plot theoretical arrival times for a seismic section

Description

plot theoretical arrival times for a seismic section

Usage

plotarrivals(x, THEORY, add = FALSE)

Arguments

x

matrix of wiggles

THEORY

theoretical arrivals

add

logical, if TRUE=Add to existing plot

Value

graphical side effect

Details

plots go from top of page down

See Also

symshot1, wiggleimage

Examples

# NOT RUN {
S1 <- symshot1()

wiggleimage(S1$smograms  , dt=(-S1$dt), dx=S1$dx)

plotarrivals(S1$x, S1$THEORY, add = TRUE)



# }