RSEIS (version 4.2-4)

rsspec.taper: Taper spectrum

Description

Taper function for spectrum analysis

Usage

rsspec.taper(x, p = 0.1)

Value

tapered trace is returned.

Arguments

x

time series trace

p

percent taper

Author

Jonathan M. Lees<jonathan.lees.edu>

Details

Cosine taper at ends of trace.

Examples

data(CE1)
Xamp <- CE1$y[CE1$x > 5.443754 & CE1$x<5.615951]
###  10% cosine taper:
xtap <- rsspec.taper(Xamp, p = 0.1)