Learn R Programming

RSEIS (version 2.1-6)

PSTLTcurve: Short Term/Long Term curve

Description

ST/LT ratio curve for sutomated picking routines

Usage

PSTLTcurve(y, dt = 0.008, fwlen = 125, bwlen = 125, perc = 0.05, stretch = 1000, MED = 255, PLOT = FALSE)

Arguments

y
signal
dt
deltaT (s)
fwlen
forward window
bwlen
backward window
perc
percent cut-off
stretch
stretch curve
MED
Median smoothing parameter
PLOT
logical, TRUE=PLOT

Value

  • list(flag=1, ind=ix, eye=eye, mix=mix, SNR=SNR, s2=s2, rat=therat)
  • flagflag on success
  • indindex of pick estimate 1
  • eyeindex of pick estimate 2
  • mixindex of pick estimate 3
  • SNRSignal/Noise ratio
  • s2sum squared
  • ratratio curve

Examples

Run this code
require(stats)

data(CE1)
plot(CE1$x, CE1$y, type='l')

z = CE1$y[ CE1$x>5.352622 & CE1$x<5.589836]

PSTLTcurve(z, dt = CE1$dt, fwlen = 125, bwlen = 125, perc = 0.05,
stretch = 1000, MED = 255, PLOT = FALSE)

Run the code above in your browser using DataLab