GAZI: Get azimuthal particle motion

GAZIR Documentation

Get azimuthal particle motion

Description

Do particle motion analysis

Usage

GAZI(ADAT, dt = 1, ex = seq(0, 100),
comp = c(4, 5, 6), sta = "ZZZ", az = 0,
len = 50, shift = 10, prev = 1, fileid = "", picks = NA, labs = NA)

Arguments

ADAT

Matrix of 3 component seismic data

dt

delta T (s)

ex

x-axis vector

comp

component names

sta

station name

az

azimuth of station orientation

len

length of time series

shift

amount to shift per window

prev

length of buffer at beginning of trace

fileid

character string to put on plot

picks

arrival times for annotation

labs

labels for arrival times for annotation

Value

list(aex=aex[1:jall], rateig=rateig[1:jall], aaz=aaz[1:jall], ai=ai[1:jall], figaz=figaz, azpar=azpar, incpar=incpar )

Examples


data("GH")


temp  <-  cbind(GH$JSTR[[4]], GH$JSTR[[5]], GH$JSTR[[6]])

pmolabs <- c("Vertical", "North", "East")


 G   <-  GAZI(temp, dt =GH$dt[4]  , comp = pmolabs, sta = GH$STNS[4] ,
az = 0, len =75, shift = 10, prev = 1)


RSEIS documentation built on Aug. 19, 2023, 5:07 p.m.