signal_taper function

Taper a signal vector.

The function tapers a signal vector with a cosine bell taper, either of a given proportion or a discrete number of samples.

signal_taper(data, p = 0, n)

Arguments

• data: eseis object, numeric vector or list of objects, data set to be processed.
• p: Numeric value, proportion of the signal vector to be tapered. Alternative to n.
• n: Numeric value, number of samples to be tapered at each end of the signal vector.

Returns

Data frame, tapered signal vector.

Examples

## load example data set
data(rockfall)

## remove mean from data set
rockfall <- signal_demean(data = rockfall_eseis)

## create artefact at the beginning
rockfall_eseis$signal[1:100] <- runif(n = 100, min = -5000, max = 5000)

## taper signal
rockfall_taper <- signal_taper(data = rockfall, n = 1000)

## plot both data sets
plot_signal(data = rockfall_eseis)
plot_signal(rockfall_taper)

Author(s)

Michael Dietze