arsmooth: compute an autoregressive smooth within each frequency bin of...

Description Usage Arguments Value Author(s) See Also Examples

View source: R/arsmooth.R

Description

this function takes each horizontal part (actually columns in R) of a spectrogram and smooths it over time using autocorrelation

Usage

1
arsmooth(spg, ...)

Arguments

spg

a spectrogram

...

arguments to ar

Value

a new spectrogram

Author(s)

Benjamin N. Taft [email protected]

See Also

ar spectrogram

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (spg, ...) 
{
    if (!("spg" %in% class(spg))) 
        return(invisible(spg))
    cix <- ncol(spg):1
    for (i in 1:nrow(spg)) {
        A <- ar(ts(spg[i, cix]), ...)
        smoov <- spg[i, cix] - A$resid
        spg[i, cix] <- smoov
    }
    invisible(spg)
  }

landmarkacoustics/SoundPoints-R documentation built on Sept. 26, 2018, 9:08 a.m.