RSEIS (version 3.7-4)

envelope: Envelope Function with Hilbert Transform

Description

Envelope Function with Hilbert Transform

Usage

envelope(x)

Arguments

x

signal vector

Value

vector of the absolute of the hilbert transform

Details

Uses the hilbert transform to get the envelope function.

Examples

# NOT RUN {
data(CE1)
ev <- envelope(CE1$y)
plot(CE1$x, CE1$y, type='l')
lines(CE1$x,ev, col='red')


# }