PMOT.drive: Interactive Particle Motion Plot
In RSEIS: Seismic Time Series Analysis Tools

PMOT.drive

R Documentation

Interactive Particle Motion Plot

Description

Plot Hodogram and show seismic particle motion

Usage

PMOT.drive(temp, dt, pmolabs = c("Vertical", "North", "East"), STAMP = "", baz = 0)

Arguments

`temp`	matrix of 3-component seismic signal
`dt`	sample interval (delta-T, seconds)
`pmolabs`	labels for traces
`STAMP`	Character string Identification stamp
`baz`	Back Azimuth, degrees

Details

Input matrix should V, N, E. Baz is not implemented yet.

Value

Graphical Side Effect.

Author(s)

Jonathan M. Lees<jonathan.lees.edu>

Examples


data("GH")
sel <-  which(GH$STNS == "CE1")


YMAT  <-  cbind(GH$JSTR[[sel[1]]][1168:1500],
GH$JSTR[[sel[2]]][1168:1500],
GH$JSTR[[sel[3]]][1168:1500])

dt  <-   GH$dt[ sel[1] ]
ftime  <-  Zdate(GH$info, sel[1], 1)

if(interactive()){
PMOT.drive(YMAT, dt, pmolabs = c("Vertical", "North", "East"),
STAMP =ftime )

}

RSEIS documentation built on Sept. 13, 2024, 1:09 a.m.