RSEIS (version 2.6-0)

GAZI: 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)

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)