R: Var-Squiggle Plot

varsquiggle {RSEIS} | R Documentation

## Var-Squiggle Plot

### Description

Plot A seismic section using Var-Squiggle, like an exploration seismic record.

### Usage

    varsquiggle(GH, sel = c(1, 2), WIN = c(0, 1), dist=NULL, thick=1 ,
    FLIP=FALSE, filcol='blue', tracecol='blue')

### Arguments

`GH` | Seismic List
`sel` | selection of seismic traces
`WIN` | time window
`dist` | distance from the source
`thick` | thickness of plotting region per trace
`FLIP` | logical, whether to plot vertical or horizontal, default FALSE, TRUE = vertical
`filcol` | color for shading
`tracecol` | color for trace

### Details

Traces are plotted and scaled each with its own window. The distance vector provides the location on the seismic record.

### Value

Graphical Side effects

### Author(s)

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

### See Also

matsquiggle, varsquig

### Examples

    data(GH)
    m <- match( GH$STNS,    GH$stafile$name)
    LATS <- GH$stafile$lat[m]
    LONS <- GH$stafile$lon[m]
    dees <- rdistaz( GH$pickfile$LOC$lat, GH$pickfile$LOC$lon, LATS, LONS)

    sel <- which(GH$COMPS=="V")
    sel <-  sel[order(dees$dist[sel])]

    ###  plot normal way:
    swig(GH, sel=sel, WIN=c(5,10), SHOWONLY=TRUE)

    ###  plot with varsquiggle
    varsquiggle(GH, sel=sel, WIN=c(5,10))

[Package RSEIS version 3.7-4 Index]