Var-Squiggle Plot
Plot A seismic section using Var-Squiggle, like an exploration seismic record.
varsquiggle(GH, sel = c(1, 2), WIN = c(0, 1), dist=NULL, thick=1 , FLIP=FALSE, filcol='blue', tracecol='blue')
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 |
Traces are plotted and scaled each with its own window. The distance vector provides the location on the seismic record.
Graphical Side effects
Jonathan M. Lees<jonathan.lees@unc.edu>
matsquiggle, varsquig
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))
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.