Learn R Programming

RSEIS (version 2.1-6)

varsquiggle: 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

Value

  • Graphical Side effects

Details

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

See Also

matsquiggle, varsquig

Examples

Run this code
data(GH)
m = match( GH$STNS,    GH$stafile$name)
LATS = GH$stafile$lat[m]
LONS = GH$stafile$lon[m]
dees = distaz( GH$pickfile$LOC$lat, GH$pickfile$LOC$lon, LATS, LONS)

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

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


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

Run the code above in your browser using DataLab