spk: compute a frequency spectrum
In landmarkacoustics/SoundPoints-R: an R version of the SoundPoints algorithm

Description Usage Arguments Value Author(s) See Also Examples

this is an internal function for shorthand purposes

spk(x)

`x`	a real-valued input vector

a vector of spectral coefficients corresponding to a real-to-real FFT

Benjamin N. Taft ben.taft@landmarkacoustics.com

fft

##---- 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 (x) 
{
    n <- floor(length(x)/2)
    s <- fft(x)
    Re(Conj(s) * s)[1:n]
  }