varsquig {RSEIS}R Documentation

Var-Squiggle plot

Description

Plot one seismogram in Var-Squiggle mode - like on an exploration record section with half the wiggled shaded.

Usage

varsquig(x, y, L = locator(2), FLIP = FALSE, col = "blue", var = 0)

Arguments

x X (time axis) coordinates
y Y amplitudes
L rectangular region on plot where plotting occurs
FLIP logical - whether to flip the amplitudes by -1
col color for shading
var logical, whether to shade

Details

A set of traces can be plotted after the plotting region has been set.

Value

Graphical Side Effects

Note

varsquig is meant to be used within other program not as a stand alone routine. The plotting region must be set up prior to plotting. The time series is scaled to fitt in the rectangular region defined by L.

Author(s)

Jonathan M. Lees<jonathan.lees@unc.edu>

See Also

varsquiggle

Examples


data(KH)

x = KH$ex[KH$ex>95& KH$ex<125]
y = KH$JSTR[[1]][KH$ex>95& KH$ex<125]

plot(x , y , type='l')

u = par('usr')
L = list(x=c(u[1], u[2]), y = c(u[3], u[4]))

plot(L$x, L$y, type='n')
 varsquig(x, y, L=L , FLIP=FALSE, col="blue", var=TRUE)

 varsquig(x, y, L=L , FLIP=FALSE, col="black", var=FALSE)



[Package RSEIS version 2.1-4 Index]