RSEIS (version 4.2-4)

deconinst: Deconvolve instrument response from seismic data

Description

Deconvolve instrument response from seismic data

Usage

deconinst(data, sintr, KAL, key, Calibnew, waterlevel = 1e-08)

Value

deconvolved signal

Arguments

data

Real vector of data

sintr

sample interval

KAL

Kalibrated response list

key

number of instrument

Calibnew

new instrument, complex vector or

waterlevel

waterlevel for low frequency division

Author

Jonathan M. Lees<jonathan.lees.edu>

Details

To avoid problems with dividing by very small numbers, water level is set =1.e-8

See Also

PreSet.Instr, ReadSet.Instr, INSTresponse

Examples

Kal <- PreSet.Instr()
amp <- rnorm(1024)
Calibnew <- c(1,1.0, 0.0 )

dy  <- deconinst(amp, 0.008, Kal,1, Calibnew, waterlevel=1.e-8)