hht (version 2.1.6)

HilbertEnvelope: Instantaneous amplitude

Description

Generates the instantaneous amplitude of an analytic signal given by HilbertTransform

Usage

HilbertEnvelope(asig)

Value

envelope

Instantaneous amplitude

Arguments

asig

The analytic signal returned by HilbertTransform

Author

Daniel C. Bowman

See Also

HilbertTransform, InstantaneousFrequency

Examples

tt <- seq(1000) * 0.01
sig <- sin(4 * pi * tt) + sin(3.4 * pi * tt)
asig <- HilbertTransform(sig)
env <- HilbertEnvelope(asig)
plot(tt, sig, type = "l")
lines(tt, env, col = "red")
lines(tt, -env, col = "red")