R: Var-Squiggle plot

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, filcol="blue", tracecol="red", 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
`filcol` | color for shading
`tracecol` | color for trace
`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, filcol="blue", tracecol="blue", var=TRUE)
    plot(L$x, L$y, type='n')
     varsquig(x, y, L=L , FLIP=FALSE, filcol="red", tracecol="blue",   var=FALSE)

[Package RSEIS version 3.7-4 Index]