RSEIS (version 1.0-9)

drive.MTM: Interactive MTM driver

Description

MTM analysis of signals

Usage

drive.MTM(a, f1 = f1, f2 = f2, len2 = 1024, COL = 2, PLOT = FALSE, PADDLAB = NULL, GUI = TRUE)

Arguments

a

f1

low frequency

f2

high frequency

len2

power of two length

COL

colors

PLOT

logical PLOT=TRUE

PADDLAB

vector of buttons

GUI

Whether to be in GUI (interactive) mode

Value

• Graphical Side effect

References

Lees, J. M. and Park, J., 1995: Multiple-taper spectral analysis: A stand-alone C-subroutine, {Computers & Geology, 21(2), 199-236.} [object Object]

plt.MTM0 data("GH") sel= which(GH$COMPS=="V")

amp = list() dees = list() stamps = list()

for( i in 1:3) { amp[[i]] = GH$JSTR[[sel[i]]] dees[i] = GH$dt[sel[i]] stamps[i] = paste(GH$STNS[sel[i]], GH$COMPS[sel[i]]) }

a = list(y=amp, dt=dees, stamps=stamps)

f1 = 0.1

f2 = floor(0.33*(1/a$dt[[1]]))

speccol = c('red', 'blue', 'purple')

drive.MTM(a, f1, f2, COL=speccol, PLOT=TRUE)

misc iplot