varsquig {RSEIS} | R Documentation |
Plot one seismogram in Var-Squiggle mode - like on an exploration record section with half the wiggled shaded.
varsquig(x, y, L = locator(2), FLIP = FALSE, col = "blue", var = 0)
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 |
A set of traces can be plotted after the plotting region has been set.
Graphical Side Effects
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.
Jonathan M. Lees<jonathan.lees@unc.edu>
varsquiggle
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)